Algorithme Jeu_de_l_oie
{
        variable de1, de2, de3, case, nbtour, i : entier
                 premier : logique
        
        case <-- 0
        nbtour <-- 0
        
        Tant que (case < 100)
        {
                nbtour <-- nbtour + 1
                Afficher("Vous êtes au tour ", nbtour, " et vous êtes en position ", case,"\n")
                de1 <-- PartieEntiere(hasard()*6)+1
                de2 <-- PartieEntiere(hasard()*6)+1
                case <-- case + de1 + de2
                Afficher("Vous venez de tirer les valeurs ", de1, " et ", de2, "vous avancez donc en position ", case,"\n")
                
                de3  <-- PartieEntiere(hasard()*6)+1
                Afficher("Vous venez de tirer la valeur ", de3,"\n")
                
                premier <-- FAUX
                Tant que ((de3 < 5) ET NON(premier) ET (case !=0))
                {
                        case <-- case - 1
                        Afficher("Comme la valeur était inférieure à 5, vous reculez d'une case pour aller à la position ", case,"\n")
                        
                        // On cherche si le case est premier
                        i <-- 2
                        Tant que (case mod i != 0 ET i*i <= case)
                        {
                                i <-- i+1
                        }
                        
                        Si (case mod i != 0) alors
                        {
                                premier <-- VRAI
                        }
                        sinon
                        {
                                de3  <-- PartieEntiere(hasard()*6)+1
                                Afficher("Vous venez de tirer la valeur ", de3,"\n")
                 
                        }
                }
                
                Si (premier) alors
                {
                        case <-- case + 3
                        Afficher("Vous êtes tombé sur un nombre premier et vous avancez donc en position ", case,"\n")
                
                }
                
        }         
        
        Afficher("Gagné !\n")
}