Составить программу, которая выводит ** экран символы с 33 по 255 и их номера

Question

Составить программу, которая выводит на экран символы с 33 по 255 и их номера

Answer 1

var i:integer;

Begin

  for i:= 33 to 255 do

    writeln(i,' = ', chr(i));

End.