input geometriesyr16 figure(0,0,10u,10u); pair A,B,C,D,E,F; D=u*(4.5,2); C=pointarc(cercles(D,5u),30); A=perpendiculaire(D,C,D) intersectionpoint cercles(C,7u); B=cercles(A,5.75u) intersectionpoint cercles(C,4u); F=168/140[C,A]; E=120/100[C,D]; trace polygone(E,F,A,B,C); trace chemin(D,A,C) dashed evenly; trace codeperp(A,D,C,5); nomme.llft(E); nomme.lrt(D); nomme.lrt(C); nomme.urt(B); nomme.urt(A); nomme.ulft(F); fin; %2 input LATEX input courbescp13 figure(0,0,11u,13u); pair E; origine((1.5,0.5)); unites(0.1,0.005); draw grille(0.25) withcolor gris; draw axes; for k=1 upto 26: dotlabel.lft(LATEX("\nombre{"&decimal(100*k)&"}"),pp(0,k*100)); endfor; for k=1 upto 8: dotlabel.bot(LATEX(""&decimal(10*k)&""),pp(10*k,0)); endfor; Legendex.ulft(btex Volume en m$^3$. etex); legendey(btex Co\^uts en euros etex); draw courbe1(0,100,2,30x); draw labelise1(btex Soci\'et\'e A etex,0.75); fin; end