![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
dct |
![]()
Сообщение
#1
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
как вывести сообщение о том что была введина цифра или буква уже повторялась????
|
![]() ![]() |
Altair |
![]()
Сообщение
#2
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
надо сохранять все введенные символы... (буквы)
если введенна цифра, или в списке есть уже такая буква выводим диагностику ![]() пример для цифры: Код var c:char; begin c:=readkey; case c of '1'..'9','0': writeln('введена цифра'); else write('символ'); end end. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
volvo |
![]()
Сообщение
#3
|
Гость ![]() |
dct
В моей функции придется кое-что изменить: Код function myReadKey: Char; function upchar(ch:char):char; {Поднимает символ в верхний регистр} begin upchar:=char(byte(ch)-$20*byte(ch>#96)-$30*byte(ch>#$DF)); end; var ch: char; begin repeat ch := upchar(readkey); if ch in ['0' .. '9'] then begin gotoxy({где-то}); writeln('введена цифра') end else if not (ch in charSet) then begin gotoxy({где-то}); writeln('не буква, или эта буква уже была') end; until ch in charSet; exclude(charset, ch); myReadKey := ch end; Сообщение отредактировано: volvo - 3.01.2005 16:58 |
dct |
![]()
Сообщение
#4
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
сообщения накладываются один на другой!!!
|
volvo |
![]()
Сообщение
#5
|
Гость ![]() |
ну тогда выводи их в самый низ экрана... тебе виднее, где они должны появляться...
|
dct |
![]()
Сообщение
#6
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
где прописывать координаты???
При запросе очередной буквы должны выводиться номер ошибки и попытки кол-во закрытых и угаданных букв??? |
dct |
![]()
Сообщение
#7
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
как это сделать(это к вопросу о запросе)
|
Altair |
![]()
Сообщение
#8
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Цитата где прописывать координаты??? для вывода текста? gotoXY -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
dct |
![]()
Сообщение
#9
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
А точнее на самой програме???
|
Altair |
![]()
Сообщение
#10
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Что значит точнее?
что тебе надо? gotoxy(x,y) перенесет курсор в позицию x,y. -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
dct |
![]()
Сообщение
#11
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
Хорошо!!
А вот это:При запросе очередной буквы должны выводиться номер ошибки и попытки кол-во закрытых и угаданных букв |
volvo |
![]()
Сообщение
#12
|
Гость ![]() |
dct
Смотри мой пост, там указано, где должны стоять GotoXY |
Altair |
![]()
Сообщение
#13
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
Цитата При запросе очередной буквы должны выводиться номер ошибки зачем? ![]() если надо ввести букву - зачем выводить сообщение об ошибке? ![]() -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
dct |
![]()
Сообщение
#14
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
Смотри мой пост, там указано, где должны стоять GotoXY
А это где??? |
Altair |
![]()
Сообщение
#15
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
3 по счету мессага.
Цитата gotoxy({где-то}); вместо "где-то" поставь "что надо";) и убери коментарий -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
dct |
![]()
Сообщение
#16
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
он пишет Unknow identetifer!!!
gotoxy(x:0,y:15) |
Altair |
![]()
Сообщение
#17
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
dct, ты бы еще по русски написал "перейди туда".
gotoxy(x,y) - у тебя переменные х и у надо описать... как integer напаример.... -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
dct |
![]()
Сообщение
#18
|
Новичок ![]() Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: ![]() ![]() ![]() |
теперь емузапятую хочется!!!!!!
Код var ch: char; x,y: byte; begin repeat ch := upchar(readkey); if ch in ['0'..'9'] then begin gotoxy(x:0;y:15);-вот здесь!!! writeln ('введена цифра') end; else if not (ch in charSet)then begin gotoxy (x:0;y:13); writeln('не буква, или эта буква уже была') КОД В ТЕГИ!!!!! Сообщение отредактировано: Oleg_Z - 3.01.2005 17:22 |
Altair |
![]()
Сообщение
#19
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
я последний раз говорю!
gotoxy(x:0,y:15); не так, а вот так: gotoxy(x,y); -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
APAL |
![]()
Сообщение
#20
|
![]() Смотрю... ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 1 055 Пол: Мужской Реальное имя: Пшеничный Алексей Анатольевич Репутация: ![]() ![]() ![]() |
мда... учебник штоли почитал... ;)
и я о том-же... Сообщение отредактировано: Oleg_Z - 3.01.2005 17:23 -------------------- |
![]() ![]() |
![]() |
Текстовая версия | 22.06.2025 23:49 |