В любой версии Pascal
Circle(X,Y,R) - рисует окружность с центром в точке (X,Y) и радиусом R.
Sector(X,Y,an,ak,R1,R2) - вычерчивает эллиптический сектор, (X,Y) - центр, R1 - радиус по OX, R2 - радиус по OY, an,ak - углы прямых, ограничивающих сектор.
PieSlice(X,Y,an,ak,R) - вычерчивает и заполняет сектор круга с центром в точке (X,Y) и радиусом R, заданный прямыми, проведенными под углами an и ak.
SetColor(C) - устанавливает цвет линии.
OutTextXY(X,Y,'text') - выводит текст в графическом режиме.