9 lines
172 B
ObjectPascal
9 lines
172 B
ObjectPascal
// Таблица символов и их кодов
|
|
begin
|
|
for var i:=32 to 255 do
|
|
begin
|
|
Write(i:4,chr(i):2,' ');
|
|
if i mod 8 = 7 then Writeln;
|
|
end;
|
|
end.
|