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

Ответы:

Деня Медвидь

09-11-2012 05:23

предлагаю решение на Бейсикеfor r=10 to 50 step 10circle (200,200),r,5next r

Оля Орленко

09-11-2012 11:26

//PascalABC.NET 3.2 сборка 1318uses 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-код!