Как нарисовать букву А в паскале

program dom; uses graphABC; begin setwindowwidth(700); setwindowheight(700); setfontsize(18); setfontcolor(clred); textout(100,100,'äîìèê'); rectangle(200,300,600,600); setbrushcolor(claqua); circle(400,225,40); setbrushcolor(claqua); fillrect(300,400,500,500); rectangle(300,400,500,500); line(400,400,400,500); line(300,450,500,450); line(200,300,400,150); line(400,150,600,300); end