autocrop
15 setxunit
%quadrillage
%marks
%%les ensembles numériques
-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 décimaux 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


bleu
ellN ellipse
[N1 N2] {times2} plot
noir
[Z1 Z2] {times2} plot
ellD ellipse
[D1 D2] {times2} plot

11 setfontsize
setTimes
bleu
 (5) N1 urtext
 (6) N2 urtext
noir
 (1) Z1 urtext
 (2) Z2 urtext
 (3) D1 urtext
 (4) D2 urtext


/fillstyle {blanc fill} def
/dx_boxit 2 def
/dy_boxit 2 def
circleit_all
setTimes
bleu
<tex>
$A$
</tex>
N [1.3 1.3] cctexlabel

noir
<tex>
$\Omega$
</tex>
D [1.3 1.3] cctexlabel