Ответ:
проверил все правильно
Объяснение:
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);