Question

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

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.