Какие изменения нужно внести в программу из примера - вопрос №395571171 от лерунька7 04.01.2021 17:19

Question

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

лерунька7 · Answer

ты же получается цикл только у икса сделал, я исправил, если не так пиши переделаю.

var x, y, r: integer;

begin

r : = 10;

x : = 10; y : = 10;

while x 640 do

begin

circle(x, y, r);

x : = x + 20;

y : = y + 20;

r : = r + 20;

end;

end.