Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Теоретические вопросы _ Agpa&Yong_programist задают вопросы

Автор: yong_programmist 7.12.2002 18:36

Как  зделать ограничение на ввод символов в паскале
напимер "пол(м/ж): м"ну, чтобы ползователь не мог ввести  больше одного символа в строку ввода. ???

Автор: yong_programmist 7.12.2002 19:04

Как организовать проверку строки ввода на буквы?
Например : нам нужно ввести возраст (n). Как сделать, чтобы если вводишь букву - то возврат идёт на начало ввода? Пока не введёшь число.
Пример
Введите ваш Возраст(от5 - до 80):%
If мы input "q,w,e,r,t,t,y,uy,u,iu,,o,,p,p,любой символ или их комбинация" then нас на %
Вот так понятно? smile.gif

Автор: AGPA 7.12.2002 19:09

Yo!  8) Как сделать очистку строки?  ???
А без gotoxy(n,m) можно?

Автор: Ivs 7.12.2002 21:41

вы уже, блин, меня запутали......
есть хорошая функция readkey которая считывает символ с клавиатуры но не выводит его.
я тут что-то написал незнаю подойдет ли

Цитата
program for_Young;
uses crt;
var
  ch,en:char;
begin
  ClrScr;
  write('Введите пол (м/ж) -> ');
  repeat
                     ch:=readkey;
  until ch in ['м','М','ж','Ж'];
  write(ch);
  repeat
                     en:=readkey;
  until en=#13;
end.

Автор: yong_programmist 8.12.2002 3:17

Через Readkey нельзя... sad.gif Мне просто нужна збалансированая прога - или кругом ввод в текстовом режиме или Readkey  Я все зделал через ввод в текстовом режиме и переделывать не хочу. Но всеравно спасибо ;D Ivs. Может алгоритм где то пригодится ;)
Спросил у преподов - уже можно!!! ;D