07.01.2010, 07:58
общий
это ответ
Здравствуйте, aller719!
Один из способов решения в приложении.
Приложение:
uses crt;
var c:char;
begin
clrscr;
writeln('Вводите символы, окончание ввода - Я');
repeat
write('Символ ');
readln(c);
if c in ['А'..'п','р'..'ё']{буквы русского алфавита, в таблице символов разбиты на 2 части}
then writeln(' - Это буква ',c);{выводим комментарий}
c:=readkey;{ожидаем нажатия клавиши}
until c='Я';{если нажата Я, программа завершается}
end.