Bonjour il m'est demander de programmer un algo sur la calculatrice (j'ai un casio) pour tester si un entier donné3 est 1^er. Voici ce que j'ai fais :

"A="?->N
If Frac(A/2)=0
Then "A EST NON PREMIER"
Stop
IfEnd
Int(A)->N
For 3->I To N Step 2
If Frac(A/I)=0
Then "A EST NON PREMIER"
Stop
IfEnd
Next
"A EST PREMIER"

Le programme fonctionne correctement, mais je remarque lors de ma vérification que sur les entiers naturels de 3 à 100, le programme me dit "A EST NON PREMIER" pour les nombres 51, 87 et 91 alors qu'ils sont premiers!

Ou est l'erreur ?

Merci!