Question

как сделать круг в круге в программе паскаль

Answer 1

uses GraphWPF;

begin

 for var i := 1 to 6 do

   DrawCircle(400, 300, 30 * i)

end.