Написать программу которая будет выводить на экран 50 кругов, которые будут делать как бы воронку, начиная с самого маленького и дальше (по размеру в смысле 1,2,3 и до 50) в pascalABC.net
как должно получится нарисовал в paint и прикрепил.
Приложения:
Ответы на вопрос
Ответил petyaGavrikov
2
uses GraphABC;
begin
Window.SetSize(600,600);
var (x,y):=(50,WindowHeight-50);
for var i:=1 to 50 do
DrawCircle(x+5*i,y-5*i,5*i);
end.
begin
Window.SetSize(600,600);
var (x,y):=(50,WindowHeight-50);
for var i:=1 to 50 do
DrawCircle(x+5*i,y-5*i,5*i);
end.
Приложения:
Новые вопросы