графика в паскале. Как нарисовать квадрат, прямоугольник, ромб, круг, эллипс в паскале?

>квадрат,
Rectangle(a,a);

>прямоугольник,
Rectangle(a,b);

>ромб,
Line(a,-b);
Line(a,b);
Line(-a,b);
Line(-a,-b);

>круг,
Circle(x,y,r);

>эллипс
Ellipse(не помню параметры, там соотношение осей)