НБ
Надежда Буравцова

помогите все расставить по местам!

program sneg;

uses GraphABC;

begin

setwindowwidth(700);

setwindowheight(700);

clearWindow;

clearWindow(clWhite);

line(262,185,270,150);

line(279,185,270,150);

circle (270,330,60);

circle (270,240,30);

circle (270,195,15);

setpenwidth(2);

arc(270,192,10,-160,0);

Line (240,240,210,255);

Line (210,290,210,150);

Line (210,180,225,150);

Line (210,180,195,150);

Line (300,240,335,255);

Line (270,185,270,196);

Circle (275,188,3);

Circle (265,188,3);

setfontsize(15);

setfontcolor(clred);

rectangle(200,300,600,550);

setbrushcolor(clYellow);

circle(400,225,40);

setbrushcolor(clYellow);

fillrect(300,400,500,500);

rectangle(300,400,500,500);

line(400,400,400,500);

line(300,450,500,450);

line(200,300,400,150);

line(400,150,600,300);

Readln

end.

АМ
Алексей Михайлов

классную прогу написал! ) проверил

ИА
Имран Ахмадов

Чем снеговик на крыше не устраивает? xD Координаты снеговика исправь и рисуй его после дома, чтобы он поверх был.

Похожие вопросы
вы тоже думаете, что жизнь всё расставит на свои места? ++
Помогите расставить запятые
помогите правильно расставить связи сущности для базы данных oracle
что значит время все расставит на свои места?
Помогите расставить артикли
помогите расставить коэфициэнты
Помогите расставить запятые:)
Помогите расставить запятые и напишите цифры, на месте которых они должны стоять
Как расставить запятые? (на месте каких цифр)
Как понимать выражение ВРЕМЯ ВСЕ РАССТАВИТ ПО МЕСТАМ?