Эллипс_Т

[Leshiy1]

здравствуйте, не понятно что

Program Ellipse;
 Uses  CRT, Graph;
 Type TFigure=Object
      x,y:Integer;
      color:Word;
      Constructor Init (ax,ay:Integer;  col:Word);
      Procedure Draw (col:Word); Virtual;
      Procedure Show;
      Procedure Hide;
      Procedure MoveTo (dx, dy:Integer);
 End;
 
 TPoint=Object(TFigure)
        Procedure Draw (col:Word); Virtual;
 End;
 
 TEllipse=Object(TPoint)
         U1,U2,xr,yr:Integer;
         Constructor Init(ax,ay,axr,ayr,aU1,aU2:Integer;  col:Word);
         Procedure Draw (col:Word); Virtual;
 
 End;
 
         Constructor  TFigure.Init (ax, ay:Integer;  col:Word);
         Begin x:=ax; y:=ay; color:=col; End;
 
         Procedure TFigure.Draw(col:Word);
         Begin End;
 
         Procedure TFigure.Show;
         Begin Draw (Color); End;
 
         Procedure TFigure.Hide;
         Begin Draw (GetBkColor); End;
 
         Procedure TFigure.MoveTo (dx, dy:Integer);
         Begin Hide; x:=x+dx; y:=y+dy; Show; End;
 
         Procedure TPoint.Draw (col:Word);
         Begin PutPixel (x, y, col); End;
 
         Constructor TEllipse.Init;
         Begin Inherited Init (ax, ay, col); xr:=axr; yr:=ayr; U1:=aU1; U2:=aU2;  End;
 
         Procedure TEllipse.Draw(col:Word);
         Begin   SetColor (col);  Ellipse (x,y,U1,U2,xr,yr);  End;
 
 Var driver,mode:integer;
     VEllipse:TEllipse;
 Begin
   Driver:=detect;
   initGraph(Driver,Mode,'C\:Pascal');
   VEllipse.Init (200,250,0,359,10,20,12);
   VEllipse.Show;
   ReadKey;
   CloseGraph;
 End.

Begin SetColor (col); Ellipse (x,y,U1,U2,xr,yr); End; вот в это строчке просит поставить точку после слова Ellipse