Блог программистов

Код:

for i:=1 to 10 do
writeln(i);

а как того же эффекта добиться в графическом режиме?