Comment savoir si deux mots sont des anagrammes ?

Deux mots sont des anagrammes s'ils ont la même longueur et chaque lettre le même nombre de fois :

mot1, mot2, lettre est un texte
demande 'Premier mot ?' dans mot1
demande 'Deuxième mot ?' dans mot2
mot1 vaut minuscules(mot1)
mot2 vaut minuscules(mot2)
anagramme est un booléen
anagramme vaut vrai
si longueur(mot1) <> longueur(mot2) alors
    anagramme vaut faux
fin si
pour i de 1 à longueur(mot1)
    lettre vaut copier(mot1, i, 1)
    si compter(mot1, lettre) <> compter(mot2, lettre) alors
        anagramme vaut faux
    fin si
fin pour
si anagramme alors
    affiche 'Ce sont des anagrammes'
sinon
    affiche 'Ce ne sont pas des anagrammes'
fin si