Чтение символа с клавиатуры и вывод его внутреннего кода Pascal(Паскаль)

Программа читает символ с клавиатуры и выводит на экран
этот символ и соответствующий ему внутренний код

Program Code_of_Char;
var
ch: Char; {Эта переменная хранит значение символа}
begin
Write('Введите любой символ:');
ReadLn(ch); {Читаем один символ}
WriteLn(ch, ' = ', ord(ch)); {Преобразуем его к целому и выводим на экран}
end.

Поделитесь своим мнением или задайте вопрос