1

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

2

Bah oui, cette instruction telle que tu l'as écrite ne veut strictement rien dire, donc la calculatrice ne l'accepte pas.
avatar
Mes news pour calculatrices TI: Ti-Gen
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é

3

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

4

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.
avatar
Maintenant 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.

5

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

6

soit par ça, en effet.