Программа, которая ждет ввода буквы и, в зависимости от введенного значения, сообщает, является ли буква заглавной или строчной

Категория: Delphi/Pascal
2012-02-04 18:02:34
code: #pascal
program fs;
 
var c:char;
 
begin
 
write('Vvedite BUKVU: ');
readln(c);
 
if (ord(c) >= 65) and (ord(c) <= 90) then
 writeln('Zaglavnaya')
else
 writeln('Propisnaya');
 
readln;
end.
Поделиться:

Похожие статьи:

теги: новички, буквы