1. Информатика
  2. Составьте программу рисования

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

pzuzuk pzuzuk    2   17.07.2019 19:40    1

Ответы
рем2107 рем2107  21.09.2020 19:50
PascalABC.NET Версия 3.0 Сборка 1150

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

Результат:

Составьте программу рисования десяти пересекающихся окружностей, расположенных горизонтально.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
sobchuk555 sobchuk555  25.06.2019 06:30
Переведите данные числа из двоичной системы счисления в десятичную 1001,110,10011,100,100011....
Dasěuke345 Dasěuke345  25.06.2019 06:30
Четвертная от этого зависит! 1. считая, что каждый символ кодируется одним байтом, определите, чему равен информационный объем в битах следующего высказывания жан-жака руссо:...
Ови11 Ови11  25.06.2019 06:30
Введите с клавиатуры 5значное число и посчитайте произведение нечетных цифр числа...
ElzaraLeonovich ElzaraLeonovich  19.05.2020 22:13
Составить программу для вычисления y=1/x на языке Паскаль...
annagutsman annagutsman  19.05.2020 22:13
Al Працюємо самостійноВизнач, які з наведених речень є висловлюваннями, та встанови їх істинн1) Слоненя схоже на кенгуру. И2) їй сподобався крокодил.3) Вона любить математику.4)...
OoMaRиNкАoO OoMaRиNкАoO  26.11.2019 18:18
Чатик 8 участников скобец7: 45 запятыня, саша, не забудьте форму взять, сегодня в футбол пойдём! саша7: 50 о, , что напомнил, осталось только уместить её в рюкзак… скобец7: 51...
alleksus alleksus  26.11.2019 18:20
Соседи определить кто из этих является друг с другом соседями, кт о увлекается музыкой, кто любит футбол, кто любит нужн о расставить в правильном порядке соседей аня ксюша арсен...
DanilNaumov DanilNaumov  04.04.2020 20:48
В одномерном массиве, который состоит из n вещественных чисел вычислить:1) произведение негативных элементов массива;2) Сумму позитивных элементов массива, расположенных до максимального...
Сенси Сенси  04.04.2020 20:50
1. Найдите ошибки в записи операторов присваивания: Var g, h:Byte; f:Real; c, q:Char; b,e:Boolean; Begin g:=5.67; f:=g+3.789; c:=’t’; b:=true; e:=h 10; q:=c End. 2. Найдите неверные...
mariana20021 mariana20021  04.04.2020 20:50
Який елемент керування використовується для візуалізації станів увімкнено / вимкнено, коли користувачеві необхідно вибрати потрібні серед незалежних параметрів? * гДодаткова інформація,...

Популярные вопросы