Мне нужно в программе pascal abc составить картину на любую тему. вот что нужно написать обязательно: ellipse setpencolor setbrushcolor rectangle линия овал там мне не нужно, чтобы что-нибудь двигалось. мне нужна )) там к примеру: солнце, небо, облака, дорога, трава, дерево, машина)) можете свое)
uses graph,crt;
var gd,gm:integer;
begin gd:=0;gm:=0;
initgraph(gd,gm, 'c:\bp\bgi');
setcolor(12);
circle(200,200,50);
line(200,202,200,175); line(200,202,180,202);
arc(200,150,0,180,15);
line(190,250,155,265); line(210,250,240,265); line(155,265,240,265); outtextXY(193,155,'12'); outtextXY(195,235,'6'); outtextXY(235,200,'3'); outtextXY(155,200,'9');
readln; readln;
closegraph;
end.