Спрограммы pascal abc нарисуйте какой-нибудь рисунок должны использоваться только команды ractangle,line,circle

Uses graphabc;beginline(150,0,100,50);line(150,0,200,50);line(100,50,200,50);line(150,0,100,50);circle(150,100,70);circle(178,78,10);circle(120,78,10);line(150,110,150,90);floodfill(150,251,clbrown);end.