Нарисовать зайчика, цветочек и солнышко - Pascal ABC
Формулировка задачи:
здравствуйте. я вот не пойму как закрасить уши и хвост зайчика которого я написал. я понимаю возможно разрыв фигуры и он закрашивает полностью он начала пути до конца. Я буду очень благодарен если у кого найдётся минутка дополнить к этому рисунку цветочек и солнышко. я читаю в справочнике в паскале но что то вникнуть особо не получается. Спасибо Заранее!
Решение задачи: «Нарисовать зайчика, цветочек и солнышко»
textual
Листинг программы
uses GraphABC; begin SetWindowSize(500,500); SetPenWidth(5); // голова SetPenColor(clGray); Circle (250, 130, 50);floodfill(250,130,clSilver); SetPenWidth(2); // щека Circle (220, 150, 20);floodfill(220,150,clSilver); SetPenWidth(2); // усы SetPenColor(clBlack); Line(270,130,220,150); Line(270,145,223,153); Line(260,160,222,157); SetPenColor(clBlack); SetbrushColor(clBlack); // носик Ellipse(202,141,190,150); SetPenColor(clGray);SetbrushColor(clwhite); SetPenWidth(5); // тело Circle (320, 230, 75);floodfill(320,230,clSilver); SetPenWidth(3); // рука Circle (250, 230, 25);floodfill(250,230,clSilver); SetPenWidth(2); // хвостик Ellipse(390,270,410,230); FloodFill (400,250,clSilver); SetPenWidth(5); //задняя лапка circle(340,315,45);floodfill(340,315,clSilver); setpencolor(clwhite); rectangle(200,320,400,400); SetPenColor(clGray); line(295,315,385,315); arc(295,55,40,60,-120); //Arc Выводит на рисунке дугу окружности //с центром в точке (x,y) и радиусом r, //заключенной между двумя лучами //ушки arc(305,60,40,-120,40); line(275,85,315,20); line(275,85,335,35); FloodFill (280,86,clSilver); FloodFill (300,55,clSilver); FloodFill (335,80,clSilver); SetPenWidth(3); //глазик line(215,130,235,90); line(235,90,255,130); line(255,130,215,130); setpencolor(clblack); setbrushcolor(clblack); circle(230,120,7); setpencolor(clwhite); line(230,120,240,107); line(230,120,240,115); setbrushcolor(clLime); //травка Rectangle(0,320,700,600); setbrushcolor(clYellow); //солнце Circle (100,80,50); end.
Объяснение кода листинга программы
- Создается окно приложения с помощью функции SetWindowSize.
- Устанавливается ширина пера с помощью функции SetPenWidth.
- Устанавливается цвет пера с помощью функции SetPenColor.
- Рисуется голова зайчика с помощью функции Circle.
- Рисуются щеки зайчика с помощью функции Circle.
- Рисуются усы зайчика с помощью функции Line.
- Рисуется нос зайчика с помощью функции Ellipse.
- Рисуется тело зайчика с помощью функции Circle.
- Рисуется рука зайчика с помощью функции Circle.
- Рисуется хвостик зайчика с помощью функции Ellipse.
- Рисуется задняя лапка зайчика с помощью функции circle.
- Рисуется дуга окружности с помощью функции arc.
- Рисуются ушки зайчика с помощью функции line.
- Рисуется глаз зайчика с помощью функции line.
- Устанавливается цвет кисти для травы с помощью функции setbrushcolor.
- Рисуется трава с помощью функции Rectangle.
- Устанавливается цвет кисти для солнца с помощью функции setbrushcolor.
- Рисуется солнце с помощью функции Circle.
- Код завершается без ошибок или исключений.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д