Présentation de 1604.jps

28.346 setxunit 15 setfontsize 7.5 setborder 90 setangle_repere %%les ensembles numeriques -15 20 setxrange -10 12 setyrange %tracerepere %%ensemble des entiers naturels /N1 {-0.9 0.6} def /N2 {0.9 -.4} def /N3 {-1 dup} def /N0 {0.2 0.2} def /ellN {N0 3 2 30} def /N {50 ellN epoint} def %%ensemble des entiers relatifs /Z1 {3 3} def /Z2 {3.8 1.7} def /Z3 {3.5 0} def /Z0 {1.1 0.8} def /ellZ {Z0 5 3 30} def /Z {45 ellZ epoint} def %%ensemble des decimaux relatifs /D1 {6.3 2} def /D2 {5.2 0} def /D3 {4.2 -1.5} def /D0 {2 0.8} def /ellD {D0 7 4 30} def /D {40 ellD epoint} def %%ensemble des rationnels /Q1 {9 2} def /Q2 {8.5 0} def /Q3 {8 6} def /Q0 {4 1.5} def /ellQ {Q0 11 5 30} def /Q {37.5 ellQ epoint} def %%ensemble des reels /R1 {14 2} def /R2 {12 -1} def /R3 {15 8} def /R0 {6 1} def /ellR {R0 15 7 30} def /R {37.5 ellR epoint} def noir ellN ellipse [N0 N1 N2 N3] {times2} plot bleu ellZ ellipse [Z1 Z2 Z3] {times2} plot vert ellD ellipse [D1 D2 D3] {times2} plot rouge ellQ ellipse [Q1 Q2 Q3] {times2} plot orange ellR ellipse [R1 R2 R3] {times2} plot 11 setfontsize noir setTimes (0) N0 urtext (1) N1 urtext (2) N2 urtext (3) N3 urtext (-1) Z1 urtext (-2) Z2 urtext (-3) Z3 urtext (-1,3) D1 urtext (3,14) D2 urtext (4/5) D3 urtext (-1/3) Q1 urtext (3/7) Q2 urtext (1,2727...) Q3 urtext (sin 17°) R3 urtext <tex> $\sqrt 2$ </tex> R1 [1.1 dup] urtexlabel setSymbol (p) R2 urtext /fillstyle {blanc fill} def /dx_boxit 2 def /dy_boxit 2 def circleit_all setTimes <tex> ${\nset}$ </tex> N [1.3 1.3] cctexlabel <tex> ${\zset}$ </tex> Z [1.3 1.3] cctexlabel <tex> ${\dset}$ </tex> D [1.3 1.3] cctexlabel <tex> ${\qset}$ </tex> Q [1.3 1.3] cctexlabel <tex> ${\rset}$ </tex> R [1.3 1.3] cctexlabel