Odpowiedzi

Najlepsza Odpowiedź!
2010-04-13T19:50:38+02:00
Uses crt;
var
a:byte;

begin
clrscr;
a:=64;
repeat
inc(a);
write(chr(a):3);
until a=90;
readln;
end.