ListeDiviseursSyntaxeListeDiviseurs(n)
Retourne la liste des diviseurs d'un nombre entier. le paramètre est au format nombre, le résultat est au format liste.
Par mickay.jill@9online.fr ExempleListeDiviseurs(30)
--->{1, 30, 2, 15, 3, 10, 5, 6} Scripton ListeDiviseurs(n)
set liste to {}
repeat with j from 1 to n
if n mod j = 0 then
set the end of liste to j
set end of liste to n div j
end if
end repeat
return ZeroDouble(liste)
end ListeDiviseurs
RemarqueUtilise ZeroDouble .
|