G=0;
g=0;
p=0;
for i=1:5000
  x=tirage_entier(1,1,10);
  if x<=2 then X=10;G=G+1;
  elseif x<=5 then X=1;g=g+1;
  else X=-1;p=p+1;
  end
end
[G g p]