Вывести на экран весь алфавит и код каждой буквы

[Андрей_И]

Вывести на экран весь алфавит и код каждой буквы

[Alex11223]

var ch:char;
begin
for ch:='A' to 'Z' do
   writeln( ch, '     ', ord(ch) );
end.

[Андрей_И]

Сообщение от Alex11223

var ch:char;
begin
for ch:='A' to 'Z' do
   writeln( ch, '     ', ord(ch) );
end.

а че оно не выводит на экран??(((((((

[MoBLer]

выводит, только надо задержку сделать, пиши в конце readln;

[Alex11223]

Что не выводит? Какой компилятор? В Free Pascal и PascalABC проверил — все выводит.

[Stilet]

Выводит. Просто нужно задержку перед эндом поставить в виде readln;

[Андрей_И]

Сообщение от Stilet

Выводит. Просто нужно задержку перед эндом поставить в виде readln;

а у меня ваще невыводит