'Programlama' forumunda sha. tarafından 9 Eyl 2009 tarihinde açılan konu
Kod: uses crt; var i:integer; begin clrscr; for i:=1 to 255 do writeln(i,' ',chr(i)); readln; end.
uses crt; var i:integer; begin clrscr; for i:=1 to 255 do writeln(i,' ',chr(i)); readln; end.
Birden fazka kullanıcı eklenir ise virgül ile ayırınız.