Напечатать коды символов от 0 до 9 (алго Паскаль)
Program a;
var
a: char;
i:integer;
Begin
for i:=0 to 9 do
write (ord(i):2);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Program a;
var
a: char;
i:integer;
Begin
for i:=0 to 9 do
write (ord(i):2);
end.