CH 7 : Les algorithmes avancés

    Début                                                                

      Si (nbdisques>0)                                                  

        Alors Début                                                     

            Hanoï(tige1,tige3,tige2,nbdisques-1)                        

            Déplace(tige1,tige3)                                        

            Hanoï(tige2,tige1,tige3,nbdisques-1)                        

        Fin                                                             

    Fin                                                                  

Avec Déplace(de,vers : caractère) une procédure qui déplace le disque posé sur la tige "de" vers la tige "vers".

Autre version de l'algorithme:

Traduction en Pascal: