Pascal! Написать программу, которая выводит на экран окружность, радиус которой «растет» из центра Измените программу

program zz1;uses GraphABC; // подключаем графическую библиотекуvar i:integer; beginfor i:=1 to 200 do // организуем цикл для радиуса кругаbegincircle(250,250, i); // рисуем кругsleep(200); // делаем небольшую задержкуend;end.

program zz1;uses GraphABC;var i:integer; beginfor i:=200 downto 1 do // организуем цикл для радиуса окружности от большого к маломуbegincircle(250,250, i);sleep(200);end;for i:=1 to 200 do // организуем цикл для радиуса окружности от малого к большомуbegincircle(250,250, i);sleep(200);end;end.