Определение того, является ли символ цифрой или буквой на Pascal

Определение того, является ли символ цифрой или буквой...

var 
  Symbol: char;
begin
  write('Введите символ: ');
  readln(Symbol);
  case Symbol of
    'a'..'z': writeln('Это маленькая английская буква');
    'A'..'Z': writeln('Это большая английская буква');
    '0'..'9': writeln('Это цифра');
  end;
end.



Просмотров: 3702
10.02.2015, 09:01 -

Категория: Статьи » Программирование » Pascal