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

Deman · 13.12.2012, 00:14

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

Vladimir_S · 13.12.2012, 10:31

Цитата:

Сообщение от Deman

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

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

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

Код:

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 · 13.12.2012, 12:09

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

13.12.2012, 00:14	#1 (permalink)
Deman Новичок Регистрация: 13.12.2012 Сообщений: 2 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Паскаль. Определить регистр буквы определить :прописная или заглавная буква вводится с клавиатуры

13.12.2012, 00:14
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Советую вам внимательно пролистать страницы с похожими темами На клавиатуре перепутались буквы Буквы в названиях процессоров Intel Клавиатура путает буквы

13.12.2012, 12:09	#3 (permalink)
Deman Новичок Регистрация: 13.12.2012 Сообщений: 2 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Vladimir_S-благодарю!!)

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070