Надо сделать лягушку в паскале. Нужен код. Помогите, пожалуйста

Question

Надо сделать лягушку в паскале. Нужен код. Помогите, пожалуйста

---

Answer 1

Ответ:

Program 1;

uses GraphABC;

Begin

SetWindowHeight(400);

SetWindowWidth(600);

Line (200,200,400,200);

Line (400,200,300,140);

line (300,140,200,200);

FloodFill (300,170,clblue);

Line (200,200,400,200);

Line (400,200,300,260);

Line (300,260,200,200);

FloodFill (300,230,cllime);

circle (160,200,40);

FloodFill (160,200,clred);

circle (440,200,40);

FloodFill (440,200,clyellow);

End.

Comments

неверно. круг один желтый должен быть...

---

На каком моменте я ошибся подскажи?

---

setbrushcolor(clred);

---

А если так,
Program 1;
uses GraphABC;
Begin
SetWindowHeight(400);
SetWindowWidth(600);
Line (200,200,400,200);
Line (400,200,300,140);
line (300,140,200,200);
FloodFill (300,170,clblue);
Line (200,200,400,200);
Line (400,200,300,260);
Line (300,260,200,200);
FloodFill (300,230,cllime);
circle (160,200,40);
FloodFill (160,200,clred);
circle (440,200,40);
FloodFill (440,200,clyellow);
End.

---

Супер!!!!! Верно!!!! Спасибо огромное!!!

---

Ну тогда подтверждай, Я изменил ответ) Баллы Баллы))