• Предмет: Информатика
  • Автор: rogozinkostya15
  • Вопрос задан 1 год назад

Помогите, пожалуйста у меня спорная

Приложения:

Ответы

Ответ дал: evilforestart
1

Ответ:

проверил все правильно

Объяснение:

1) будет 10 кружков

2) цвет черный по умолчанию

диаметр кружков 20 экран по x 640 ,нужно 640/20 = 32 кружка до конца экрана

for i:=1 to 32 do

begin

circle(x,y,r);

SetPenColor(rgb(x+126,y+13,x+5));

x:=x+20;

end;

3) менять у, y:=y+20;

4) x: = 320 ;  y: = 240 ; r:=r+20; DrawCircle(x,y,r);


rogozinkostya15: Спасибо
Похожие вопросы