ΠΡΠ²ΠΎΠ΄ Π½Π° ΡΠΊΡΠ°Π½ ΡΠ°Π±Π»ΠΈΡΡ ASCII, ΠΏΠ°ΡΠΊΠ°Π»Ρ.
ΠΡΠ²ΠΎΠ΄ Π½Π° ΡΠΊΡΠ°Π½ ΡΠ°Π±Π»ΠΈΡΡ ASCII, ΠΏΠ°ΡΠΊΠ°Π»Ρ.
ΠΡΠΏΠΎΠ»ΡΠ·ΡΠ΅ΠΌ ΡΡΠ½ΠΊΡΠΈΡ Chr().
ΠΠΏΠ΅ΡΠ°ΡΠΈΡ Mod ΠΏΡΠΈΠΌΠ΅Π½ΡΠ΅ΠΌ Π΄Π»Ρ ΡΠΎΠ·Π΄Π°Π½ΠΈΡ ΠΊΠΎΠ»ΠΎΠ½ΠΎΠΊ.
program ASCII_Tabl;
{ΠΡΠ²ΠΎΠ΄ Π½Π° ΡΠΊΡΠ°Π½ ΡΠ°Π±Π»ΠΈΡΡ ASCII ΠΏΠ°ΡΠΊΠ°Π»Ρ}
const
N = 255;
var
i: byte;
begin
Writeln('ΠΡΠ²ΠΎΠ΄ Π½Π° ΡΠΊΡΠ°Π½ ΡΠ°Π±Π»ΠΈΡΡ ASCII ΠΏΠ°ΡΠΊΠ°Π»Ρ:');
for i := 1 to N do
begin
if (i mod 4) = 0 then
Writeln;
Write(i: 4, ' = ', chr(i), ' | ');
end;
//Π·Π°Π²Π΅ΡΡΠ΅Π½ΠΈΠ΅ ΡΠ°Π±ΠΎΡΡ ΠΏΡΠΎΠ³ΡΠ°ΠΌΠΌΡ
WriteLn('ΠΠ°ΠΆΠΌΠΈΡΠ΅ <Enter>, ΡΡΠΎΠ±Ρ Π²ΡΠΉΡΠΈ.');
ReadLn();
end.
Π Π΅Π·ΡΠ»ΡΡΠ°Ρ:
ΠΡΠ²ΠΎΠ΄ Π½Π° ΡΠΊΡΠ°Π½ ΡΠ°Π±Π»ΠΈΡΡ ASCII Π² ΠΠ°ΡΠΊΠ°Π»Π΅.