Паскаль. Помогите доделать программы.

[Vadim123456]

Применение циклов со счётчиком

Вывести на экран коды таблицы ASCII от 0 до 255 и их символы. Выводить парами код и символ.

Program gg;
Uses crt;
Var
K,M:integer;
Begin
Clrscr;
For K:=0 to 255 do Write(K,' ',Chr(K):8);
Readln;
End.

[Vadim123456]

Когда результат выводится на экран виден только конец, а начало не видно. Как сделать так, чтобы было видно всё?

[IT-man]

For K:=0 to 255 do begin
 Write(K:4,' ',Chr(K));
if k mod 10 =0 then writeln;
end;

[Vadim123456]

спасибо)))))