Помогите пожалуйста по информатике!!! очень срочно!! нужно составить программу в паскале.

Question

Помогите пожалуйста по информатике!!! очень срочно!! нужно составить программу в паскале.

---

Comments

В графических библиотеках языка Паскаль вертикальная ось обычно направляется вниз, а не как в метематике. Но это необязательно, конечно.

Answer 1

// PascalABC.NET

uses GraphWPF;

begin

 SetMathematicCoords(0, 26, 0);

 Pen.Color:=Colors.DodgerBlue;

 Pen.Width:=0.1;

 DrawCircle(6,3,1);

 DrawCircle(11,3,1);

 DrawCircle(15,3,1);

 DrawCircle(17,3,1);

 DrawCircle(20,3,1);

 DrawCircle(22,3,1);

 DrawCircle(6,11,0.5);

 DrawCircle(7,13,1);

 DrawCircle(9,15,1.5);

 DrawRectangle(4,7,5,-3);

 DrawRectangle(9,4,4,6);

 DrawRectangle(10,9,2,-2);

 DrawRectangle(5,10,1,-3);

 DrawRectangle(14,9,9,-5);

 Line(13,5,14,5);

end.

---

Comments

Добавить False в SetMathematicCoords(0, 26, 0, False); если сетка не нужна.

---

спасибо огромное

---

Пожалуйста