Le
programme simule le tirage au sort d'une série de N lancers du
dé, puis compte le nombre de singletons 6 , de couples de 6 , de
triplets de 6, ..., contenus dans la série obtenue.
Le
programme
<?
$n=$_POST[nb]; // nombre de lancers récupéré
à partir du formulaire
for ($i=1;$i<=$n;$i++) // boucle
{
$d[$i]=rand(1,6); // entier choisi aléatoirement
entre 1 et 6 ( stockage dans un tableau )
echo "$d[$i] " ; // affichage de l'entier
}
While ( $j<=$n) // parcours de la suite ( du
tableau ) en entier
{
$k=0; // mise du compteur à 0
if ($d[$j]==6) //
test pour voir si le début d'une suite de 6 apparaît
{
while ( $d[$j]==6) //
boucle pour voir le nombre de terme de la suite
{
$k++;
if (isset($d[$j+1]) and $d[$j+1]<>6)
{
if (isset($nb_fois[$k])) $nb_fois[$k]++;
else $nb_fois[$k]=1;//
incrémentation du nombre de suites de longueur $k dans un tableau
}
$j=$j+1;
}
else $j++;
}
for ($i=1;$i<=$n;$i++) // affichage des résultats
{
unset($s);
unset($s1);
if ( isset($nb_fois[$i]) and $nb_fois[$i]>1) $s='s'; //Pour
éviter les fautes d'orthogaphes !!!
else $s='';
if ($i>1) $s1='s';
else $s1='';
if ( isset($nb_fois[$i]))echo "<br>il y a $nb_fois[$i] suite$s
de $i nombre$s1 ";
}
?>