Составте программу в рисовании PascalABC

uses graphABC; var x,y:integer; begin x:=windowwidth div 2; y:=windowheight-80; rectangle(x-100,y,x+100,y+50); circle(x-100,y-100,20); circle(x+100,y-100,20); line(x,y,x-86,y-86); line(x,y,x+86,y-86); line(x,y,x,y-160); arc(x,y-140,20,0,180); end.