J'ai un problème ce programme qui en fait doit me donner la liste de diviseurs positifs d'un nombre entier naturel non nul N
- Code: Tout sélectionner
Define div(n)=
Prgm
:1→x
:For i,1,n
:x+i→x
:EndFor
:Disp "Diviseurs:=",x
:EndPrgm
Et je dois utiliser for