9 lines
169 B
ObjectPascal
9 lines
169 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.
|