Задача на графику.
Написать программу, которая будет рисовать квадрат, внутри него круг и заливать квадрат, круг и фон тремя разными цветами (любыми)...

Да, это задача на графику, правильно. И что с того?

uses graph;
var i,i2: integer;
begin
initgraph(i,i2,' ');
setbkcolor(3);
setcolor(5);
rectangle(220,340,420,140);
circle(320,240,99);
setfillstyle(1,2);
floodfill(320,240,5);
setfillstyle(1,5);
floodfill(221,341,5);
readln;
closegraph;
end.