x:char; // Описание переменных (x - символьный тип)
Begin
//Начало программыreadln (x); //Считывание переменной
writeln (ord (x)); //Вывод номера в таблице ASCII
end. //Конец программы
Пример программы на Паскаль с использованием функции Chr:
Var x:integer; // Описание переменных (x - целочисленный тип) Begin //Начало программы
readln (x); //Считывание переменной
writeln (chr (x)); //Вывод символа по номеру в таблице ASCII end. //Конец программы
Пример программы на Паскаль с использованием функций Pred и Succ:
Var x:char; // Описание переменных (x - символьный тип)
Begin //Начало программы
readln (x); //Считывание переменной
writeln (pred (x)); //Вывод предыдущего символа в таблице ASCII
writeln (succ (x)); //Вывод следующего символа в таблице ASCII
end. //Конец программы
Пример программы на Паскаль с использованием функции UpCase:
Var x:char; // Описание переменных (x - символьный тип)
Begin //Начало программы
readln (x); //Считывание переменной
writeln (upcase (x)); //Вывод английской буквы верхнего регистра
end. //Конец программы