- Code: Tout sélectionner
EffEcr
Lbl 0
Input " " , A
entAleat(-1,1) → B
Disp A+B
Goto 0
Court mais efficace

Signalez moi les bugs please
EffEcr
Lbl 0
Input " " , A
entAleat(-1,1) → B
Disp A+B
Goto 0
ClrHome (EffEcr)
While 1
Input "",A
Disp A+randInt(-1,1 (entAlea)
End
Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 4 invités