Bonjour !

Voici mon probleme, j'ai tapé le programme ci-dessus, et reglé qlq problemes a l'aide votre forum,
Cependant je ne trouve pas de solutions a un bête probleme de syntaxe (-_-)

Lbl T:"N": If "?"->N
1->D
1->R
While R(different)0
If D^2>N
Then Goto 1
IfEnd
D+1->D
N-(Int(N/D)xD->R
WhileEnd
Lbl 1
If R(different)0
Then "N PREMIER"
Else "N DIVISIBLE PAR" grin
IfEnd
Goto0

Le probleme de syntaxe se situe juste avant le N en bleu

Merci d'avance grin
Bah oui, cette instruction telle que tu l'as écrite ne veut strictement rien dire, donc la calculatrice ne l'accepte pas.
avatarMes news pour calculatrices TI: Ti-Gen (fr/en), MobiFiles (de)
Mes projets PC pour calculatrices TI: TIGCC, CalcForge (CalcForgeLP, Emu-TIGCC)
Mes chans IRC: #tigcc et #inspired sur irc.freequest.net (UTF-8)

Liberté, Égalité, Fraternité
Vu les dernieres lignes du programme qui donne un diagnostic a partir de la valeur de N, je penche pour l'instruction de saisie d'une donné :

Lbl T: Input "N = ?", N
Ce n'est pas du BASIC de TI ça, encore moins du BASIC de TI68k.

IfEnd et WhileEnd sont des mots-clé du BASIC de Casio, tout comme les instructions consistant simplement en une chaîne de caractères à afficher.
avatarMaintenant j'ai la flemme de garder une signature à jour sur ce site. Je n'ai même plus ma chaîne Exec sous la main.
De mémoire (ca fait bien 10ans ma dernière Casio) pour saisir au clavier et sauver en mémoire on fait :
?->N.

Donc ca doit se corriger soit par quelque chose comme

Lbl T: Disp "N = ?": ?->N

soit par ça, en effet.
avatar<<< Kernel Extremist©®™ >>>
Feel the power of (int16) !