Présentation de cerc_circ_001.jps

/syracuse/bbgraf/albums/geometrie_2nd/cerc_circ_001.jpg
-5 8 setxrange -3 10 setyrange tracerepere marks /A {-3 0} def /B {6 3} def /C {1 8} def %% les milieux /A' {B C milieu} def /B' {A C milieu} def /C' {B A milieu} def %% les mediatrices /dA {B C mediatrice} def /dB {A C mediatrice} def /dC {B B mediatrice} def %% le centre du cercle circonscrit /O {dA dB interdroite} def %% les angles droits O A' C angledroit O B' A angledroit O C' B angledroit %% on marque les longueurs A' C 1 marked B A' 1 marked A C' 2 marked C' B 2 marked /dotangle A C angle def A B' milieu times3 B' C milieu times3 1.7 setlinewidth [A B C] polygone .7 setlinewidth [A' O C'] ligne [O B'] ligne O dashpoint orange O O C distance cercle bleu setTimesItalic (K) O dltext (A) A dltext (B) B crtext (C) C urtext