rouge=ensemble("R(1)","R(2)","R(3)","R(4)");
verte=ensemble("V(1)","V(2)","V(3)","V(4)");
total=0;
for i=1:2000;
a=tirage_ensemble(1,rouge);
b=tirage_ensemble(1,verte);
S=valeur(a)+valeur(b);
total=total+S;
end;
moy=total/2000;
disp("Valeur moyenne de S : " + string(moy));
