Предмет: Информатика,
автор: Lian0202
Составьте программу (Паскаль), которая рисует 3 окружности, радиусом 100, расположенные по вертикали.
ПОМОГИТЕ
Ответы
Автор ответа:
0
Ответ:
uses GraphABC;
var i,y:integer;
begin
SetWindowSize(300,700);
y:=150;
for i:=1 to 3 do
begin
Circle(150,y,100);
y:=y+200
end
end.
Объяснение:
картинка
Приложения:
Интересные вопросы
Предмет: Экономика,
автор: alinasmirnova8
Предмет: Другие предметы,
автор: Demonessa
Предмет: Алгебра,
автор: Demonessa
Предмет: Литература,
автор: makskkrochkin