input geometriesyr16; marque_r:=25; figure(0,0,1u,1u); trace feuillet withcolor gris; pair A,B,C; A=u*(0.15,0.1); B-A=u*(0.8,0.2); C-A=u*(0.25,0.7); trace droite(A,B); trace perpendiculaire(A,B,C) withcolor rouge; marque_p:="plein"; drawoptions(withcolor bleu); pointe(C); drawoptions(); trace cercles(C,marque_r/10); fin; figure(0,0,u,u); pair C; C-A=u*(0.25,0.55); trace feuillet withcolor gris; trace droite(A,B); trace parallele(A,B,C) withcolor rouge; marque_p:="plein"; drawoptions(withcolor bleu); pointe(C); drawoptions(); trace cercles(C,marque_r/10); fin; figure(0,0,u,u); trace feuillet withcolor gris; pair A,B; A=u*(0.2,0.2); B-A=u*(0.7,0.4); trace segment(A,B); trace perpendiculaire(A,B,iso(A,B)) withcolor rouge; marque_p:="plein"; drawoptions(withcolor bleu); pointe(A,B); drawoptions(); trace cercles(A,marque_r/10); trace cercles(B,marque_r/10); fin; figure(0,0,u,u); trace feuillet withcolor gris; pair A,B,C; A=u*(0.15,0.3); B-A=u*(0.75,-0.1); C-A=u*(0.6,0.5); trace chemin(C,A,B); trace droite(A,CentreCercleI(A,B,C)) withcolor rouge; drawoptions(withcolor bleu); pointe(A,B,C); drawoptions(); trace cercles(A,marque_r/10); trace cercles(A,marque_r/10); trace cercles(A,marque_r/10); fin; end