| Vladimir_S |
13.12.2012 10:31 |
Цитата:
Сообщение от Deman
(Сообщение 832716)
определить :прописная или заглавная буква вводится с клавиатуры
|
Был такой знаменитый советский фильм "Чапаев", так вот там есть эпизод, где крестьянин, обращаясь к комдиву, спрашивает:
- А скажи мне, Василь Иваныч, ты за большевиков али за коммунистов?
Это я к тому, что "прописная" и "заглавная" - это слова-синонимы, оба они означают большую букву. Очевидно, в задании подразумевается "прописная или строчная". Пожалуйста. Предупреждаю: программа работает только с латиницей, с кириллицей (по причине нестандартизации кодировок) заморачиваться неохота. Но если уж очень надо, скажите, сделаю и это.
Код:
Var
C:Char;
Begin
Write('Enter the letter: ');
Readln(C);
If (Ord(C)>64) and (Ord(C)<91) then
writeln('Uppercase')
else
If (Ord(C)>96) and (Ord(C)<123) then
writeln('Lowercase')
else
writeln('This symbol is not a letter!');
Readln
End.
|
