input geometriesyr15; figure(0,0,5u,4u); pair A,O,B; A=u*(0.75,0.75); nomme.llft(A); O=u*(4.25,0.75); nomme.lrt(O); B=u*(4.25,3.25); nomme.urt(B); trace triangle(A,O,B); trace codeperp(A,O,B,5); fin; figure(0,0,5u,4u); pair A,B,C,R,S; A=u*(0.75,0.75); C=u*(4.25,0.75); B=u*(2.25,3.25); R=2/5[A,B]; S=11.6/29[A,C]; trace triangle(A,B,C); trace R--S; nomme.llft(A); nomme.bot(S); nomme.lrt(C); nomme.top(B); nomme.ulft(R); fin; figure(0,0,8u,8u); pair O,A,B,C,D,E,F,H; O=u*(4,4); path cc; cc=cercle(O,3cm); A=point(0) of cc; B=rotation(A,O,60); C=rotation(B,O,60); D=rotation(C,O,60); E=rotation(D,O,60); F=rotation(E,O,60); H=projection(O,A,B); trace cc; trace A--B--C--D--E--F--cycle; trace D--A dashed evenly; trace E--B dashed evenly; trace F--C dashed evenly; trace O--H dashed evenly; trace codeperp(O,H,A,5); nomme.rt(A); nomme.urt(B); nomme.ulft(C); nomme.lft(D); nomme.llft(E); nomme.lrt(F); nomme.rt(H); nomme.ulft(O); fin; figure(0,0,8u,8u); pair O,M,N,P,Q,R,S,T,U,V,W,K; O=u*(4,4); path cc; cc=cercle(O,3cm); M=point(0) of cc; N=rotation(M,O,36); P=rotation(N,O,36); Q=rotation(P,O,36); R=rotation(Q,O,36); S=rotation(R,O,36); T=rotation(S,O,36); U=rotation(T,O,36); V=rotation(U,O,36); W=rotation(V,O,36); K=projection(O,M,N); trace cc; trace M--N--P--Q--R--S--T--U--V--W--cycle; label.top(btex I etex,O); drawoptions(dashed evenly); trace M--S; trace N--T; trace P--U; trace Q--V; trace R--W; trace O--K; drawoptions(); draw codeperp(O,K,M,5); nomme.rt(M); nomme.urt(N); nomme.urt(P); nomme.ulft(Q); nomme.ulft(R); nomme.lft(S); nomme.llft(T); nomme.llft(U); nomme.lrt(V); nomme.lrt(W); nomme.lft(K); fin; end;