Ascii Kodları Programlama Dillerinde Çok Büyük Önem Taşıyan Ascii Kod
larının Tümüne yakını Bu Programda yer Alıyoruses crt;
var
Kod:
i,sa,su:integer;
begin
clrscr;
sa := 0; su := 1;
for i := 33 to 254 do begin
inc(sa);
if sa >=25 then begin
su := su + 7;
sa := 1;
end;
gotoxy(su...