Составьте программу рисования окружностей с центром в точке (200,200) и радиусами 10, 20, 30, 40, 50 (примените команду For)

Ответы:
ЕЛИНА ЛУГОВСКАЯ
02-02-2019 19:03

//PascalABC.NET 3.2 сборка 1318 uses GraphABC; Var i:integer; begin for i:=5 downto 1 do circle(60,60,i*10); end.

Картинка с текстом вопроса от пользователя Колян Мельниченко

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составьте программу рисования окружностей с центром в точке (200,200) и радиусами 10, 20, 30, 40, 50 (примените команду For) » от пользователя Колян Мельниченко в разделе Разное. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!