Write a program that displays a circle whose radius “grows” from the center.

Write a program that displays a circle whose radius “grows” from the center. Modify the program so that the circle first decreases in radius and then increases.

program zz1;
uses GraphABC; // connect the graphics library
var
i: integer;
begin
for i: = 1 to 200 do // organize a loop for the radius of the circle
begin
circle (250,250, i); // draw a circle
sleep (200); // make a little delay
end;
end.

program zz1;
uses GraphABC;
var
i: integer;
begin
for i: = 200 downto 1 do // organize a loop for the radius of the circle from large to small
begin
circle (250,250, i);
sleep (200);
end;
for i: = 1 to 200 do // organize a loop for the radius of the circle from small to large
begin
circle (250,250, i);
sleep (200);
end;
end.