Номер 1 Составьте программу рисования 12 окружностей радиусом 25, с координатами центров...

Question

Номер 1
Составьте программу рисования 12 окружностей радиусом 25, с координатами центров окружностей: (25,100), (75,100),(125,100), (175,100), (575,100).

Номер 2
Составьте программу рисования 10 концентрических окружностей с центром в точке (300,200) и радиусами 10,20,30,...100.

Мне именно точное решение, спаситеееее оценка за четверть решается

Comments

Даны 5 центра, а просите сделать 12 окружностей в 1 задании.Самому что ли додумать остальные?)

---

да сложно

Answer 1

Номер 2.

uses GraphABC;
begin
circle(300,200,100);
circle(300,200,90);
circle(300,200,80);
circle(300,200,70);
circle(300,200,60);
circle(300,200,50);
circle(300,200,40);
circle(300,200,30);
circle(300,200,20);
circle(300,200,10);
end.

Номер 1.
uses GraphABC;
begin
circle(25,100,25);
circle(75,100,25);
circle(125,100,25);
circle(175,100,25);
circle(225,100,25);
circle(275,100,25);
circle(325,100,25);
circle(375,100,25);
circle(425,100,25);
circle(475,100,25);
circle(525,100,25);
circle(575,100,25);
end.

Comments

а точно с первой не поможешь? у нас рисунок дан, в нем 12 кружков слева направо маленьких

---

Ну вот и все

---

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