program babo4ka;
uses crt,graphABC;
begin
setwindowsize(600,600);
line(263,47,220,5);
line(300,47,340,5);
setbrushcolor(clblack);
circle(283,70,30);
setbrushcolor(clyellow);
circle(198,180,65);
circle(371,180,65);
circle(159,340,100);
circle(410,340,100);
setbrushcolor(clred);
ellipse(180,145,240,220);
ellipse(330,145,390,220);
setbrushcolor(clbrown);
ellipse(260,100,310,500);
setbrushcolor(clblue);
ellipse(90,270,140,333);
ellipse(430,270,480,333);
setbrushcolor(clgreen);
ellipse(155,320,205,385);
ellipse(363,320,413,385);
end.
Объяснение:
program babo4ka;
uses crt,graphABC;
begin
setwindowsize(600,600);
line(263,47,220,5);
line(300,47,340,5);
setbrushcolor(clblack);
circle(283,70,30);
setbrushcolor(clyellow);
circle(198,180,65);
circle(371,180,65);
circle(159,340,100);
circle(410,340,100);
setbrushcolor(clred);
ellipse(180,145,240,220);
ellipse(330,145,390,220);
setbrushcolor(clbrown);
ellipse(260,100,310,500);
setbrushcolor(clblue);
ellipse(90,270,140,333);
ellipse(430,270,480,333);
setbrushcolor(clgreen);
ellipse(155,320,205,385);
ellipse(363,320,413,385);
end.
Объяснение: