Pascal Определение типа символа

[#Azamat]

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

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

Автор: Неизвестен