Présentation de cerc_004.jps

autocrop
30 setxunit

/cerc {O 2} def
/A {2 0} def
/B {360 5 div cerc cpoint} def
/C {360 5 div 2 mul cerc cpoint} def
/D {360 5 div 3 mul cerc cpoint} def
/E {360 5 div 4 mul cerc cpoint} def

O 2 cercle
[O A B C D E] points
[A C E O] polygone
[A C E O] polygone
[E B D O] polygone
[D A C O] polygone
[O B] ligne

setTimesItalic
   (O) O (-2 2) uctext
   (A) A crtext
   (B) B urtext
   (C) C ultext
   (D) D dltext
   (E) E drtext