Algorithme : Vérifie si un mot est palidrome

Début
    Fonction EstPalindrome(Mot : str) : bool
        Si Mot[0] != Mot[Longueur(Mot) - 1]
            Retourner(Faux)
        Sinon si Longueur(Mot) < 2 /* vrai pour 0 ou 1 lettre */
            Retourner(Vrai)
        Sinon
            Mot.Effacer(0) /* efface la première lettre */
            Mot.Effacer(Longueur(Mot) - 1) /* efface la dernière lettre */
            Retourner(EstPalindrome(Mot))
        FinSi
    FinFonction
Fin