Паскаль. Определить регистр буквы

[Deman]

Паскаль. Определить регистр буквы

определить :прописная или заглавная буква вводится с клавиатуры

 

[Vladimir_S]

определить :прописная или заглавная буква вводится с клавиатуры

Был такой знаменитый советский фильм "Чапаев", так вот там есть эпизод, где крестьянин, обращаясь к комдиву, спрашивает:
- А скажи мне, Василь Иваныч, ты за большевиков али за коммунистов?

Это я к тому, что "прописная" и "заглавная" - это слова-синонимы, оба они означают большую букву. Очевидно, в задании подразумевается "прописная или строчная". Пожалуйста. Предупреждаю: программа работает только с латиницей, с кириллицей (по причине нестандартизации кодировок) заморачиваться неохота. Но если уж очень надо, скажите, сделаю и это.

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.

 

[Deman]

Vladimir_S-благодарю!!)