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