Напечатать коды символов от 0 до 9 (алго Паскаль)

Question

Напечатать коды символов от 0 до 9 (алго Паскаль)

Answer 1

Program a;
var 
a: char;
i:integer;
Begin
for i:=0 to 9 do
write (ord(i):2);
end.

Comments

Пишет ошибку