@options; @figure; A = point(-1,2.3); P = point(0,4) {(-0.04,-1.37)}; B = point(2,2); sAP =segment(A,P); sPB =segment(P,B); var disAP =AP; p_disAP =milieu(A,P) {i}; t_disAP1 =texte(p_disAP,"$disAP$") {rouge,(-1,-1.02),dec1}; var disPB =PB; p_disPB =milieu(P,B) {i}; t_disPB1 =texte(p_disPB,"$disPB$") {rouge,(0.67,-0.69),dec1}; var pas =0.04; I =milieu(A,B) {i}; sAB =segment(A,B) {i}; perpIsAB =perpendiculaire(I,sAB) {i}; cerayP0.2 =cerclerayon(P,pas); C2 =intersection(perpIsAB,cerayP0.2,1) {i}; C =intersection(perpIsAB,cerayP0.2,2) {rouge,trace,sansnom}; sCA =segment(C,A) {rouge,3}; sCB =segment(C,B) {rouge,3}; @analyse; @enonce; @config; couleurfonddessin=0xbdd7cc; couleurfondtexte=0xceddff; couleurfondanalyse=0xceddff; couleurfondenonce=0xceddff; couleurtextinfo=0xffffff; figure=0,0,696,480,ouvert; script=1704,125,258,330,ouvert; analyse=1704,463,258,149,ouvert; enonce=1704,3,254,117,ouvert; info=50,582,646,646; listetransfos=invisible; boutons=;