Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Все лабораторные работы по паскалю / 1 лаб. Арифметические операции / Prog08
.pas program prog08;
uses crt;
var c: char;
n: byte;
begin
clrscr;
write(' Введите число в диапозоне от 32 до 255 : ');
read(n);
writeln(n, ' это номер символа : ', chr(n));
readln;
end.
uses crt;
var c: char;
n: byte;
begin
clrscr;
write(' Введите число в диапозоне от 32 до 255 : ');
read(n);
writeln(n, ' это номер символа : ', chr(n));
readln;
end.
Соседние файлы в папке 1 лаб. Арифметические операции