input geometriesyr.mp ; %---------------------------------------------------------------------------- %exercice : espace %---------------------------------------------------------------------------- u:=0.5cm; figure (-7u,-3u,7u,12u); pair A,B,AA,BB,S,I,II,O; path cc,hh,dd; O=(0,0); S=(0,5u); I=(0,9.5u); A=(-6u,9.5u); B=(6u,9.5u); AA=2/3[S,A]; BB=2/3[S,B]; II=2/3[S,I]; dd:= (-0.3u,0)--(0.3u,0)--(0.3u,5.5u)--(-0.3u,5.5u)--cycle; fill dd withcolor 0.5[white,black]; cc:=cercle(O,4u); cc:= cc yscaled 0.2; cc := cc shifted II; hh := subpath(0,length cc/2) of cc; dd := hh--S--cycle; fill dd withcolor 0.1[white,black]; cc := cercles(O,2.5u); cc:= cc yscaled 0.2; draw cc; draw A--S--B; draw S--I dashed evenly; draw A--B dashed evenly; cc:=cercle(O,4u); cc:= cc yscaled 0.2; cc := cc shifted II; draw subpath(0,length cc/2) of cc dashed evenly; draw subpath(length cc/2,length cc) of cc; cc:=cercle(O,6u); cc:= cc yscaled 0.2; cc := cc shifted I; draw cc; nomme.lft(A); nomme.rt(B); nomme.top(I); nomme.urt(S); label.llft(btex A' etex, AA); trace codeperp(S,I,B,5); fin; %---------------------------------------------------------------------------- %exercice : espace %---------------------------------------------------------------------------- u:=1cm; figure (-u,-u,5u,5u); pair A,B,C,D,E,F,G,H,I,J; D=(0,0); C=(4u,0); B=(4u,4u); A=(0,4u); G=(0,2u); F=(2u,2u); E=(2u,4u); J=(0,u); I=(3u,u); H=(3u,4u); path pp; pp=E--F--G--J--I--H--cycle; trace hachurage(pp,60,0.1mm,0); draw pp; draw A--B--C--D--cycle; cotation(A,E,5mm,2mm,btex $2$ etex); cotation(H,B,5mm,2mm,btex $x$ etex); cotation(D,A,3mm,2mm,btex 4 etex rotated -90); nomme.ulft(A); nomme.urt(B); nomme.lrt(C); nomme.llft(D); nomme.urt(E); nomme.ulft(F); nomme.urt(G); nomme.ulft(H); nomme.lrt(I); nomme.lrt(J); fin; end ;