Предмет: Информатика,
автор: ÇóòĻ
Номер 1
Составьте программу рисования 12 окружностей радиусом 25, с координатами центров окружностей: (25,100), (75,100),(125,100), (175,100), (575,100).
Номер 2
Составьте программу рисования 10 концентрических окружностей с центром в точке (300,200) и радиусами 10,20,30,...100.
Мне именно точное решение, спаситеееее оценка за четверть решается
Ответы
Автор ответа:
0
Номер 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.
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.
Автор ответа:
0
а точно с первой не поможешь? у нас рисунок дан, в нем 12 кружков слева направо маленьких
Автор ответа:
0
Огромное спасибо!!!!!!!!!!!!!!!!!
Похожие вопросы
Предмет: Физкультура и спорт,
автор: kilon357159
Предмет: Математика,
автор: Strel3103
Предмет: Алгебра,
автор: Аноним
Предмет: Экономика,
автор: Ибрагим72
Предмет: Химия,
автор: dayana11erdnieva