uses crt,graph; var x,y:integer;a,b,Rx,Ry:integer; begin x:=100;y:=100;a:=7;b:=8;Rx:=50;Ry:=100; setcolor(9); ellipse(x,y,a,b,Rx,Ry) end.