Alors voilà j'essaie de faire un programme en ti basic qui te dis si un nombre est premier parce que pourquoi pas et j'ai que ça à faire
Bref mon petit problème c'est que j'ai une erreur de syntaxe sur "Goto 4", J'ai juste pas compris. Ps je code ça dans ti connect
En gros pour faciliter la lecture du code :
Premièrement je demande le nombre à test avec la variable A, Deuxièmement j'appliques les divisions pour 2(première fois), puis 3, 5 ou 7 en fonction des bool(labels 3 4 5), troisièmement j'appliques des conditions(label 2) pour savoir si le nombre est premier et je redefinis les bool pour passer à la division suivante, et enfin je dis si le chiffre est premier ou pas(labels 0 et 1). Ps pour les bools je considere que 0=faux et 1=vrai.
Le code :
- Code: Select all
"labels : 0=premier, 1=nonpremier, 2=conditions, 3=DivPar3, 4=DivPar5, 5=DivPar7
EffÉcran
0→A
"Nombre input
0→B
"Nombre après division
0→C
"bool div3
0→D
"bool div5
0→E
"bool div6
Disp "Entres un nombre"
Input "",A
EffÉcran
partDéc(A/2)→B
Goto 2
Lbl 3
partDéc(A/3)→B
Goto 2
Lbl 4
partDéc(A/5)→B
Goto 2
Lbl 5
partDéc(A/7)→B
Goto 2
Lbl 2
If B=0
Then
Goto 1
Else
If C=0
Then
1→C
Goto 3
End
If D=0
Then
1→D
Goto 4
End
If E=0
Then
1→E
Goto 5
End
Goto 0
End
Lbl 0
Disp "Premier"
Pause
Stop
Lbl 1
Disp "Non premier"
Pause
Stop
