Пожалуйста, нарисуйте что-нибудь в паскале АБС

uses graphabc; const n=100; begin setwindowsize(4*n,5*n); setpenwidth(3); line(n,2*n,n div 2,5*n); line(3*n,2*n,7*n div 2,5*n); circle(2*n,3*n div 2,3*n div 2); circle(7*n div 3,4*n div 3,n div 10); circle(13*n div 4,4*n div 3,n div 10); setbrushcolor(0); circle(7*n div 3-n div 20,4*n div 3,n div 50); circle(13*n div 4-n div 20,4*n div 3,n div 50); setpenwidth(4); line(n*19 div 10,5*n div 3,n*10 div 3,5*n div 3) end.