input geometriesyr16; figure(0,0,7.5u,7.5u); trace grille(0.5) withcolor gris; trace polygone(pp(0,5),pp(10,0),pp(15,10),pp(5,15)) withpen pencircle scaled1.5bp; fin; figureespace(-10u,-10u,10u,10u); Initialisation(5,-30,20,500); color D,A,B,C,H,E,F,G; trace Pave(A,B,C,D,H,E,F,G)(0.5,1,0.559); nomme.lft(D); nomme.llft(A); nomme.lrt(B); nomme.urt(C); nomme.ulft(H); nomme.top(E); nomme.rt(F); nomme.top(G); trace hachurage(polygone(D,A,E,H),60,0.2,0); trace appelation(D,A,-2mm,btex 10 etex); trace appelation(A,B,-2mm,btex 20 etex); trace appelation(E,A,2mm,btex 11,18 etex); finespace; figure(0,0,5u,5u); pair H,E,A; H=u*(1,4); E-H=u*(2,0); A-E=u*(0,-3); trace polygone(A,H,E); trace codeperp(H,E,A,5); nomme.bot(A); nomme.urt(E); nomme.ulft(H); fin; figure(0,0,5u,5u); pair H,G,A; H=u*(1,3); A-H=u*(0,-2); G-H=u*(3,0); trace polygone(A,H,G); trace codeperp(G,H,A,5); nomme.rt(G); nomme.llft(A); nomme.ulft(H); fin; end