Code
ClrHome
lbl J
1->S
1->P
50->D
ClrHome
Menu("NIVEAU","FASTOCH",F,"INTERMEDIAIRE",I,"ECLAIR",R
Lbl F
350->D
Lbl I
150+D->D
Lbl R
int rand(9*P)+P->T
ClrHome
Output(1,1,S)
Output(1,3,"CHIFFRE
If P>1
Output(1,10,"S
For([vide],1,100 (* Pour [vide] tapez alpha + 3 *)
If [vide]=70
ClrHome
End
Disp "",T
For([vide],1,D
End
ClrHome
Input C
If P<1000000000
p*10->P
S+1->S
If C=T
Goto R
Disp T
Pause
Clrhome
Code
ClrHome
lbl J
1->S
1->P
50->D
ClrHome
Menu("NIVEAU","FASTOCH",F,"INTERMEDIAIRE",I,"ECLAIR",R
Lbl F
350->D
Lbl I
150+D->D
Lbl R
(randInt(1,9*P))+P->T
ClrHome
Output(1,1,S)
Output(1,3,"CHIFFRE
If P>1
Output(1,10,"S")
For([vide],1,100 (* Pour [vide] tapez alpha + 3 *)
If [vide]=70
ClrHome
End
Disp "",T
For([vide],1,D
End
ClrHome
Input C
If P<1000000000
p*10->P
S+1->S
If C=T
Goto R
Disp T
Pause
Clrhome