оператор рисования окружности

В паскалеРисование окружности  procedure DrawCircle(X, Y, R: integer);Здесь (X, Y) – координаты центра, R – радиус окружности. Окружность, как и линия, рисуется текущим цветом.В Borland Pascal  procedure Circle(X, Y: integer; R: Word);