Какие изменения нужно внести в программу из примера - вопрос №402190171 от Кириииил 06.11.2022 04:43

Question

Информатика: Какие изменения нужно внести в программу из примера 17 .1 для того, чтобы рисунок выглядел следующим образом. ! uses graphabc; var x, y, r: integer; begin r : = 10; x : = 10; y : = 10; while x 640 dobegin circle (x, y, r); x : = x + 20; end; end.​

Кириииил · Answer

uses graphabc;var x, y, r: integer;beginr:=10;x:=10; y:=10;while x 640 dobeginDrawcircle(x, y, r);x := x + 15;end;end.Задаём процедуру drawcircle и делаем x+15 вместо 20....