prgm
local a
local k
local n
prompt n
For k,0,n,1
n/k->a
If (int(a)*k) = n then (mais mettre int(a)=a est plus rapide en fait ^^)
disp a
endif
endfor
endprgm
Alors, c'est très lourd, et ça va bien bugguer (le if va mettre des années ^^)
Bon maintenant, c'est le moment de saigner mon bout de code ^^
edit *k rajouté (erreur d'inattention)
edit2 dlvar
edit3 : fôtes de frappes et pas delvar en fait
