input geometriesyr.mp ; %---------------------------------------------------------------------------- % Exercice 1 %---------------------------------------------------------------------------- u:=0.75cm; figure (-8u,-8u,10u,8u); pair L,M,H,N; M=(0,0); L=(0,2.4u); N=(5.9u,0); H=projection(M,L,N); draw L--M--N--cycle; draw M--H; trace codeperp(M,H,N,5); trace codeperp(L,M,N,5); nomme.top(L); nomme.bot(M); nomme.bot(N); nomme.urt(H); fin; %--------------------------------------------------------------------------- %---------------------------------------------------------------------------- % Exercice 1 géométrique %---------------------------------------------------------------------------- u:=1cm; figure (0,0,15u,15u); pair O,A; O=(5.5u,6.5u); A=(7.5u,8u); papiercinq((0,0),(15u,15u),orange); draw (7.5u,6u)--(9.5u,6u)--(9.5u,9.5u)--cycle; draw droite((10u,5.5u),(10.5u,6u)); label.ulft(btex $(d)$ etex,(15u,10.5u)); label.top(btex $(d)$ etex,(8.5u,6.5u)); marque_p :="croix"; MarquePoint(O); MarquePoint(A); nomme.llft(O); nomme.llft(A); drawarrow (5.5u,9u)..(6.5u,9.5u)..(7.5u,9u); fin; %--------------------------------------------------------------------------- %--------------------------------------------------------------------------- end ;