//Обычный вариантuses GraphABC;begin Rectangle(0,350,Window.Width,Window.Height); Circle(0, 0, 100); Rectangle(390,400,415,250); Circle(400, 170, 100); Circle(350, 170, 15); Circle(420, 130, 10); Circle(420, 230, 10);end.//===================================//Вариант с заливкойuses GraphABC;begin Rectangle(0,350,Window.Width,Window.Height); FloodFill(1,351, clGreen); Circle(0, 0, 100); FloodFill(1,1, clYellow); Rectangle(390,400,415,250); FloodFill(395,255, clBrown); Circle(400, 170, 100); FloodFill(401,171, clLime); Circle(350, 170, 15); FloodFill(350,170, clRed); Circle(420, 130, 10); FloodFill(421,131, clRed); Circle(420, 230, 10); FloodFill(421,231, clRed);end.