ОЧЕНЬ СРОЧНО!!!!! Пожалуйста посчитайте сделать в Паскале рыбку, пожалйстаа, умолья.

uses graphABC;

begin

line(100,120,150,20);

line(150,20,350,20);

line(350,20,300,120);

line(100,280,150,380);

line(150,380,350,380);

line(350,380,300,280);

line(350,200,450,100);

line(350,200,450,300);

line(450,100,550,100);

line(450,300,550,300);

line(500,200,550,100);

line(500,200,550,300);

ellipse(0,100,450,300);

Arc(45,200,60,-90,90);

circle(50,180,5);

line(5,220,60,220);

end.