int rand100+1->B
0->E
Lbl Z
ClrHome
Disp "ENTREZ UN NOMBRE"
Disp "ENTRE 1 ET 100 :"
Input A
If A=B
Then
ClrHome
E+1->E
Disp "C EST VRAI !"
Disp "ESSAIS :"
Disp E
Goto 0
End
If A>B
Then
Disp "MOINS ."
E+1->E
Pause
Goto Z
End
If A
Then
Disp "PLUS ."
E+1->E
Pause
Goto Z
End
Lbl 0

Ce programme vous demande simplement d'entrer un nombre compris entre 1 et 100.
A vous de le trouver en effectuant le moins d'essais possibles ...
Téléchargez le fichier pmoins.zip.
Si vous souhaitez augmenter la difficulté, vous pouvez modifier la première ligne comme suit :
| Avant ... | Après ... |
| int rand100+1->B | int rand1000+1->B |
Cet exemple change l'écart entre les nombres générés :
Ici, on passe de nombres compris entre 1 et 100 à des nombres compris entre 1 et 1000.