Вывод окружностей, эллипсов и их дуг

ПроцедураCircle (x, y: integer; R: word) модуля Graph рисует окружность радиуса R, используя x и y как графические координаты центра.

Кроме процедуры проведения окружностей, в модулеGraph предусмотрены процедуры рисования дуг окружностей.

Процедура Arc (X, Y: integer; StAngle, EndAngle, radius: word) модуля Graph рисует дугу радиусом radius от начального угла StAngle к конечному EndAngle, используя X и Y как графические координаты центра. Задавая значения углам 0 и 359 градусов, получают окружность.

ПроцедураEllipse (X, Y: integer; StAngle, EndAngle, XR, YR: word) модуля Graph рисует эллиптическую дугу от начального угла StAngle к конечному EndAngle, используя X и Y как графические координаты центра, а XR и YR как горизонтальный и вертикальный радиусы эллипса. Задавая значения углам 0 и 359 градусов, получают эллипс.

Процедура PieSlice (X, Y: integer; StAngle, EndAngle, radius: word) модуля Graph рисует и штрихует сектор окружности радиусом radius от начального угла StAngle к конечному EndAngle, используя X и Y как графические координаты центра окружности.

ПроцедураSector (X, Y: integer; StAngle, EndAngle, XR, YR: word) модуля Graph рисует заштрихованный сектор эллипса от начального угла StAngle к конечному EndAngle, используя X и Y как графические координаты центра и XR и YR как горизонтальный и вертикальный радиусы.

ПроцедураFillEllipse (X, Y: integer; XR, YR: word) модуля Graph рисует заштрихованный эллипс, используя X и Y как графические координаты центра и XR и YR как горизонтальный и вертикальный радиусы.