Номер 1 составьте программу рисования 12 окружностей радиусом 25, с координатами центров окружностей: (25,100), (75,,100), (175,100), (575,100). номер 2 составьте программу рисования 10 концентрических окружностей с центром в точке (300,200) и радиусами 10,20,. мне именно точное решение, оценка за четверть решается
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.