Algorithme : Vérifie si deux chaînes S1 et S2 sont anagrammes

Début
    Fonction SontAnagrammes(S1 : str, S2 : str) : bool
        Si Longueur(S1) = Longueur(S2) = 0
            Retourner(Vrai)
        Sinon Si Longueur(S1) != Longueur(S2)
            Retourner(Faux)
        Sinon
            lettre <- Dépiler(S1)
            S2.Supprimer(lettre) /* Si la lettre n'est pas trouvée, laisser S2 tel quel */
            Retourner(SontAnagrammes(S1, S2))
        FinSi
    FinFonction
Fin