Регистрация
Даше4ка16
07.10.2021 10:25
Информатика
Есть ответ 👍

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

123
371
Посмотреть ответы 2

Ответы на вопрос:

4kusssssp08s5c
4kusssssp08s5c
4,8(79 оценок)
Program axaxa; uses graphabc; var i,a,d: integer; begin a: =200; d: =50; setwindowsize (640,480); setpencolor (clbrown); setpenwidth (2); for i: =1 to 5 do begin circle(a,a,d); d: =d-10; end; end.
OlesyaKotova1
OlesyaKotova1
4,5(75 оценок)
600 мбайт = 614 400 кбайт кол-во фото 614400 / 400 = 1 536 время = 1536 * 5 с = 7 680 с = 2.13333333333333 часов

Популярно: Информатика