 если вводится не буква и цифра выводится сообщение |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| dct |
 3.01.2005 16:30
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация:  0   |
как вывести сообщение о том что была введина цифра или буква уже повторялась????
|
   |
 
|
  |
Ответов
| dct |
3.01.2005 17:18
Сообщение
#2
|
|
Новичок Группа: Пользователи Сообщений: 26 Пол: Мужской Репутация: 0 |
теперь емузапятую хочется!!!!!!
Код 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 |
|
|
|
Сообщений в этой теме
dct если вводится не буква и цифра выводится сообщение 3.01.2005 16:30
Altair надо сохранять все введенные символы... (буквы)
ес... 3.01.2005 16:35 volvo dct
В моей функции придется кое-что изменить:
fu... 3.01.2005 16:36 dct сообщения накладываются один на другой!!... 3.01.2005 16:41 volvo ну тогда выводи их в самый низ экрана... тебе видн... 3.01.2005 16:43 dct где прописывать координаты???
При запросе очередн... 3.01.2005 16:50 dct как это сделать(это к вопросу о запросе) 3.01.2005 16:51 Altair
для вывода текста?
gotoXY 3.01.2005 16:54 dct А точнее на самой програме??? 3.01.2005 16:56 Altair Что значит точнее?
что тебе надо?
gotoxy(x,y) пере... 3.01.2005 16:58 dct Хорошо!!
А вот это:При запросе очередной б... 3.01.2005 16:59 volvo dct
Смотри мой пост, там указано, где должны стоя... 3.01.2005 16:59 Altair
зачем?
:)
если надо ввести букву - зачем выводить... 3.01.2005 17:01 dct Смотри мой пост, там указано, где должны стоять Go... 3.01.2005 17:04 Altair 3 по счету мессага.
вместо "где-то" пост... 3.01.2005 17:07 dct он пишет Unknow identetifer!!!
gotoxy(... 3.01.2005 17:11 Altair dct, ты бы еще по русски написал "перейди туд... 3.01.2005 17:15 Altair я последний раз говорю!
gotoxy(x:0,y:15);
не ... 3.01.2005 17:20 APAL мда... учебник штоли почитал... ;)
и я о том-же.... 3.01.2005 17:21 dct я ни чё не понимаю!!!1 3.01.2005 17:22 APAL
Ага, а значения присваиваются так: x:=0; y... 3.01.2005 17:24 dct
repeat
ch := upchar(readkey);... 3.01.2005 17:27 APAL Если ты не будешь сам заключать код в теги, то я н... 3.01.2005 17:28 dct SORRRy!!! 3.01.2005 17:29
Altair все, dct, здесь не "разумный компилятор... 3.01.2005 17:29 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 24.06.2025 19:40 |