Срочно!! составить программу которая преобразует символ в числовой код в паскале.

Question

Срочно!! составить программу которая преобразует символ в числовой код в паскале.

Answer 1

Var
  a: char;

begin
  writeln('Введите символ');
  readln(a);
  writeln(ord(a));  //функция ord(a) возвращает числовой код символа а
end.