input geometriesyr16; figure(0,0,10u,10u); pair A,I,M,O,U; A=u*(1,1); I-A=u*(4,0); U-A=u*(-0.25,4); O-U=u*(3,0); trace polygone(A,I,U,O); M=segment(A,O) intersectionpoint segment(U,I); nomme.top(U); nomme.top(O); nomme.lrt(I); nomme.lft(A); nomme.rt(M); fin; figureespace(-10u,-10u,10u,10u); Initialisation(5,0,20,500); color A,B,C,O; O=(0,0,0); B=(0,-1/2,0); C=(0,1/2,0); A=(0,0,1); path cc,cd; cc=cercles(O,C,O,C,(-1,0,0)); cd=cercles(O,C,O,C,(0,0,-1)); trace chemin(B,A,C); trace segment(B,C) dashed evenly; trace subpath(length cc/2,length cc) of cc; trace subpath(0,length cc/2) of cc dashed evenly; trace subpath(0,length cd/2) of cd; nomme.lft(B); nomme.rt(C); nomme.top(A); nomme.bot(O); trace segment(A,O) dashed evenly; trace codeperp(A,O,C,5); finespace; figure(0,0,13u,11u); trace grille(0.5) withcolor bleu; pair A,B,C; A=pp(3,4.5); B=pp(6.5,6.5); C=pp(9,5); path cc; cc=polygone(A,pp(3,5.5),pp(4,5.5),pp(4.5,4.5)); trace cc; nomme.bot(A); marque_p:="plein"; nomme.urt(B); nomme.urt(C); marque_p:="non"; fin; figure(0,0,6u,6u); pair A,B,C,E,M; A=u*(1,1); B-A=u*(4,0); M=1/4[A,B]; C-A=u*(0,3); E=droite(C,B) intersectionpoint perpendiculaire(A,B,M); trace triangle(A,B,C); trace chemin(A,E,M); nomme.llft(A); nomme.bot(M); nomme.rt(B); nomme.top(E); nomme.top(C); fin; end