input geometriesyr.mp ; %---------------------------------------------------------------------------- % Exercice 1 %---------------------------------------------------------------------------- u:=0.75cm; figure (-8u,-8u,12u,8u); pair A,B,C,D,M,N; D=(0,0); C=(10u,0); A=(0,4u); B=(10u,4u); M=76/100[B,A]; N=76/100[B,C]; draw A--B--C--D--cycle; draw M--N; draw A--C; path ff; ff=A--M--N--C--cycle; trace hachurage(ff,60,0.2,0); nomme.top(A); nomme.top(B); nomme.bot(C); nomme.bot(D); nomme.top(M); nomme.rt(N); fin; %--------------------------------------------------------------------------- %---------------------------------------------------------------------------- % Exercice 3 géométrique %---------------------------------------------------------------------------- u:=1cm; figure (-8u,-8u,12u,10u); pair A,B,C,D,E,F,G,H,S,O,OO; A=(0,0); B=(6u,0); D=(2u,2u); C= D shifted B; O=0.5[A,C]; S= O shifted (0,5u); E=1/3[S,A]; F=1/3[S,B]; G=1/3[S,C]; H=1/3[S,D]; OO=1/3[S,O]; draw A--B--C; draw E--F--G; draw A--S; draw B--S; draw C--S; draw A--D--C dashed evenly; draw E--H--G dashed evenly; draw D--S dashed evenly; draw O--S dashed evenly; nomme.bot(A); nomme.bot(B); nomme.rt(C); nomme.ulft(D); nomme.ulft(E); nomme.lrt(F); nomme.urt(G); nomme.urt(H); nomme.top(S); nomme.bot(O); label.llft(btex $O'$ etex,OO); marque_p :="croix"; MarquePoint(O); MarquePoint(OO); fin; %--------------------------------------------------------------------------- %---------------------------------------------------------------------------- % Exercice 1 géométrique %---------------------------------------------------------------------------- u:=1cm; figure (-8u,-8u,8u,8u); pair A,C,D; A=(0,0); C=(5u,0); D=(0,5u); draw A--C--D--cycle; trace codeperp(D,A,C,5); trace codesegments(A,C,A,D,2); nomme.bot(A); nomme.bot(C); nomme.top(D); fin; %--------------------------------------------------------------------------- %---------------------------------------------------------------------------- % problème %---------------------------------------------------------------------------- u:=1cm; figure (0,0,12u,12u); papiercinq((0,0),(12u,12u),orange); fin; %--------------------------------------------------------------------------- %--------------------------------------------------------------------------- end ;