Comment décomposer un nombre en facteurs premiers ?

On divise par 2, 3, 4… tant que c'est possible :

n est un nombre
demande 'Un entier supérieur à 1 ?' dans n
facteurs est un tableau
diviseur est un nombre
diviseur vaut 2
tant que n > 1
    si n mod diviseur = 0 alors
        facteurs ajoute diviseur
        n vaut n / diviseur
    sinon
        diviseur ajoute 1
    fin si
fin tant que
affiche joindre(facteurs, ' × ') // 60 → 2 × 2 × 3 × 5