Программирование в paschal abc

program dom;
uses graphABC;
var i:integer;
begin
setwindowwidth(700);
setwindowheight(700);
setfontsize(18);
//setfontcolor(clred);
//textout(100,100,'äîìèê');
//rectangle(200,300,600,600);
setbrushcolor(claqua);
//circle(400,225,40);
//etbrushcolor(claqua);
//fillrect(300,400,500,500);
//rectangle(300,400,500,500);
for i:=1 to 20 do
line(200+i*10,400+i*10,200+i*10,500+i*10);
{line(300,450,500,450);
line(200,300,400,150);
line(400,150,600,300); }
end.