Cela fait depuis 1 semaine que j'ai acheté une TI Nspire CX CAS et je n'arrive pas à réaliser un programme qui nous donne tous les diviseurs d'un nombre.
Voici ce que j'ai fait
- Code: Tout sélectionner
Define LibPub div(x)=
Func
:Local p
:For p,1,floor(√(x))
: If ((x)/(p))=floor(((x)/(p))) Then
: Disp p,((x)/(p))
: EndIf
:EndFor
:EndFunc
Le problème c'est que lorsque j'essaie de tester l'algorithme, on m'affiche "Erreur: erreur de domaine".
Est ce que quelqu'un pourrait m'indiquer où se trouve l'erreur et également les erreurs "d'écriture" de l'algorithme comme c'est la première fois que je programme sur TI ?
Et si quelqu'un a une idée pour améliorer l'algorithme notamment pour ne pas afficher 2 fois les mêmes valeurs quand on rentre un carré parfait, elle est bienvenue
Merci d'avance !