input geometriesyr.mp ; %---------------------------------------------------------------------------- %exercice 1 %---------------------------------------------------------------------------- u:=0.75u; figure (-u,-u,11u,10u); pair A,B,C,D,O; pair M,N,P,Q; pair R,S,T,U; M=(0,0); N=(10u,u); P=(0,8u); Q=(10u,9u); R=(4u,-u); S=(7u,10u); T=(8u,0); U=(0,9u); A=whatever[P,Q]=whatever[T,U]; B=whatever[P,Q]=whatever[R,S]; O=whatever[R,S]=whatever[T,U]; D=whatever[M,N]=whatever[R,S]; C=whatever[M,N]=whatever[T,U]; label.top("A",A); label.urt("B",B); label.rt("O",O); label.llft("D",D); label.top("C",C); draw M--N; draw P--Q; draw R--S; draw T--U; fin; %---------------------------------------------------------------------------- %exercice 1 %---------------------------------------------------------------------------- u:=0.75u; figure (-4u,-6u,11u,10u); pair O,A,B,C,D,E,F; O=(u,u); path cc; cc=cercle(O,3u); A=point(0.10*length cc) of cc; B=A rotatedaround(O,15); C=B rotatedaround(O,135); D=C rotatedaround(O,45); E=D rotatedaround(O,75); F=E rotatedaround(O,90); path camem[]; camem1=A--arccercle(A,B,O)--O--cycle; camem2=B--arccercle(B,C,O)--O--cycle; camem3=C--arccercle(C,D,O)--O--cycle; camem4=D--arccercle(D,E,O)--O--cycle; camem5=E--arccercle(E,F,O)--O--cycle; camem6=F--arccercle(F,A,O)--O--cycle; path part[]; path legende; legende=(0,0)--(u*(1,0))--(u*(1,1))--(u*(0,1))--cycle; for k:=1 upto 5 : part[k]=legende shifted (8u,6u-k*2u); fill part[k] withcolor k/5*white; draw part[k]; label.rt(btex $\cdots$ etex, (9.5u,6.5u-k*2u)); endfor fill camem1 withcolor white; fill camem2 withcolor 0.25white; fill camem3 withcolor 0.5white; fill camem4 withcolor 0.75white; fill camem5 withcolor 0.0white; for k:=1 upto 5 : fill camem[k] withcolor k/5*white; draw camem[k]; endfor endfig; %---------------------------------------------------------------------------- %exercice : espace %---------------------------------------------------------------------------- u:=0.75cm; figure (-u,-u,11u,10u); pair A,B,C,D,K,L,M,N,H,S; pair V; V=(2u,u); A=(0,0); B=(5u,0); C= B shifted V; D= A shifted V; H=whatever[A,C]=whatever[B,D]; S= H shifted (0,9u); M=2/3[S,A]; N=2/3[S,B]; K=2/3[S,C]; L=2/3[S,D]; draw A--B--C--S--cycle; draw S--B; draw M--N--K; draw A--D--C dashed evenly; draw S--D dashed evenly; draw S--H dashed evenly; draw M--L--K dashed evenly; nomme.bot(A); nomme.bot(B); nomme.rt(C); nomme.lrt(D); nomme.urt(K); nomme.lrt(L); nomme.ulft(M); nomme.lrt(N); nomme.lrt(H); nomme.top(S); fin; end ;