program p_35_5;
var i:word;
BEGIN
for i:=1 to 256 do begin
write(chr(i):3);
if i mod 16 =0 then writeln;
end;
readln;
END.

<< Назад