input geometriesyr16; u:=7.5mm; figure(0,0,6.5u,5u); pair A,B,C,I,J; A=u*(0.75,0.75); B-A=u*(5,0); C=4.9/7[A,B]; I=u*(4,3); J=4.9/7[A,I]; trace triangle(A,B,I); trace J--C; trace marque_para(droite(J,C),droite(I,B),0.5); nomme.llft(A); nomme.lrt(B); nomme.bot(C); nomme.top(I); nomme.top(J); fin; figure(1.5u,-0.5u,7.75u,6u); pair F,A,C,E,R; F=u*(5,0); A=u*(7,4); C=u*(2,2); trace triangle(A,F,C); E=2/7[F,A]; R=2/7[F,C]; trace segment(E,R); trace marque_para(droite(E,R),droite(A,C),0.5); nomme.bot(F); nomme.urt(A); nomme.ulft(C); nomme.lrt(E); nomme.bot(R); fin; figure(0,0,5u,5u); pair A,B,C,R,T; A=u*(1,4); B=u*(2.5,1); C=u*(4,2); R=2/5[A,B]; T=2/5[A,C]; trace triangle(A,B,C); trace segment(R,T); trace marque_para(droite(T,R),droite(C,B),0.5); nomme.lft(A); nomme.bot(B); nomme.rt(C); nomme.llft(R); nomme.top(T); fin; figure(0,0,5u,5u); pair H,T,L,A,B; H=u*(1,3); T=u*(2.5,4); L=u*(4,1); A=1.4/4[H,L]; B=1.4/4[H,T]; trace triangle(H,T,L); trace segment(A,B); trace marque_para(droite(A,B),droite(T,L),0.5); nomme.llft(A); nomme.top(B); nomme.rt(L); nomme.lft(H); nomme.top(T); fin; end