< >

Составьте программу рисования десяти пересекающихся окружностей, расположенных горизонтально.

Ответы

Ответ дал: Аноним
0
PascalABC.NET Версия 3.0 Сборка 1150

uses GraphABC;
begin
  for var i := 1 to 10 do DrawCircle(100, 100 + 20 * i, 100);
end.

Результат:
Приложения:
Вас заинтересует
Русский язык
2 года назад
Помогите сделать морфологический разбор наречия: поудобнее
Обществознание
2 года назад
Рассказ о клюкве по окружающему
Українська мова
7 лет назад
Складіть твір про майбутні плани на літні канікули з використанням синонімів, антонімів, омонімів СРОЧНО!!! ДАЮ 50 БАЛЛОВ
Литература
7 лет назад
помогите соч 7 класс.Какое животное помогло Светлане пробудиться от тяжкого сна?​
Физика
9 лет назад
как высчитывается средняя скорость?
Математика
9 лет назад
Составить уравнение прямой, проходящей через точку М(1;2) параллельно прямой линии:2x-3y+1=0
Математика
10 лет назад
(-9a+4b)в квадрате=....
География
10 лет назад
Сколько материков в мире