Как нарисовать снеговика (из трёх кругов с руками), но без глаз и носа в программе...

0 голосов
58 просмотров

Как нарисовать снеговика (из трёх кругов с руками), но без глаз и носа в программе Паскаль АВС. Пожалуйста помогите очень срочно!


Информатика (58 баллов) | 58 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

Uses graphABC;beginsetpenwidth(3);setwindowsize(600,700);ellipse(120,350,280,480);circle(200,300,60);circle(200,210,40);line(170,90,230,90);line(160,180,240,180);line(170,90,160,180);line(230,90,240,180);floodfill(200,173,clblack);floodfill(200,123,clblack); setbrushcolor(clblack);circle(190,200,5);circle(210,200,5);line(200,210,220,220);line(200,220,220,220);line(200,210,200,220);floodfill(204,214,clblack);setpenwidth(5);arc(200,230,10,180,0);line(70,320,170,250);line(230,250,330,300);line(300,450,350,200);
line(350,200,320,140);line(350,200,340,140);line(350,200,360,140);line(350,200,380,140);line(350,200,400,140);end.

(410 баллов)