Какие изменения нужно внести в программу из примера 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.

Zvezba1111111 Zvezba1111111    3   19.03.2019 17:50    4

Ответы
Маширо11 Маширо11  19.03.2019 19:00

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

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика