a=150
Pour simuler les 1000 parties, on écrit le script suivant :
/*Programme tp 89a
*/
var a=150;//mise initiale
var u,v;//numeros des boules U et V
var gain;//d'une partie
for(n=1;n<=1001;n=n+1){
u=Math.floor(Math.random()*10);//entre 0 et 9
v=Math.floor(1+Math.random()*10);//entre 1 et 10
gain=-100;
if(u<=4) gain=gain+a;
if(v<=4) gain=gain+a;
Println("|"+n+"|"+u+"|"+v+"|"+gain+"|");
}Le tableau est trop long pour figurer ici (et il ne présente guère d’intérêt).
Pour avoir le gain moyen, on modifie le script précédent pour avoir le suivant :
/*Programme tp 89b
*/
var a=150;//mise initiale
var u,v;//numeros des boules U et V
var somme=0;
var gain;//d'une partie
for(n=1;n<=1001;n=n+1){
u=Math.floor(Math.random()*10);//entre 0 et 9
v=Math.floor(1+Math.random()*10);//entre 1 et 10
gain=-100;
if(u<=4) gain=gain+a;
if(v<=4) gain=gain+a;
somme=somme+gain;
}
Alert("Le gain moyen est "+somme/1000);a variable
Il suffit de remplacer a par d’autres valeurs pour conjecturer la possibilité ou non que le jeu soit équilibré.
Commentaires