input geometriesyr; %-------------------------------------------------------------------------------- %Problème %-------------------------------------------------------------------------------- u:=0.5cm; figure(-u,-u,16u,9u); pair A,B,C,D,E,F,M; E=(0,0); D=(6u,0); F=(9u,0); C=(15u,0); B=(15u,8u); M=(9u,8u); A=(6u,8u); path pp; pp:= M--B--C--F--cycle; fill pp withcolor 0.2[white,black]; draw A--B--C--E--cycle; draw A--D dashed evenly; draw M--F; nomme.top(A); nomme.top(B); nomme.bot(C); nomme.bot(D); nomme.bot(E); nomme.bot(F); nomme.top(M); trace codeperp(A,D,E,5); trace codeperp(M,F,C,5); trace codeperp(M,B,C,5); trace codeperp(B,C,F,5); label(btex salle de etex,(6u,4u)); label(btex recherche etex,(6u,3.5u)); label(btex salle de etex,(12u,4u)); label(btex travail etex,(12u,3.5u)); fin; %-------------------------------------------------------------------------------- %Exercice sur l'espace %-------------------------------------------------------------------------------- u:=0.5cm; figure(-7u,-4u,7u,9u); pair A,B,I,S,O; path cc; O=(0,0); A=(-6u,0); B=(6u,0); I=(0,6u); S=(0,8u); draw A--B; draw A--S; draw B--S; draw S--O dashed evenly; trace codeperp(S,O,A,5); cc := cercles(O,6u); cc := cc yscaled 0.25; draw subpath(0,length cc /2) of cc dashed evenly; draw subpath(length cc /2,length cc) of cc; nomme.lft(A); nomme.bot(O); nomme.top(S); nomme.rt(I); marque_p := "croix"; MarquePoint(I); fin; end;