Forum

Catégorie : Programmes
Forum : Les programmes des internautes
Vues : 1817
Réponses : 13
Type : discussion
Etat : réponses autorisées

Prog calcul mental

craminou le 24/06/2007 à 22:00
et le plus pourri pour la fin : un prog pour les desepérés qui savent vraiment plus qui faire (moi)




Code
Lbl 6
int(rand*10+1ü ( ) A
int(rand*10^A)ü ( ) B
int(rand*10+1ü ( ) C
int(rand*10^C)ü ( ) D
int(rand*3+1)ü ( ) E
If E=1
Goto 1
If E=2
Goto 2
If E=3
Goto 3
Lbl 1
Disp B
Disp "+
Disp D
Disp "?
Lbl 5
B+Dü ( ) E
0ü ( ) F
While FøE
Input F
Y+1ü ( ) Y
If F=0.123456789
Goto 7
End
Disp "CORRECT
Z+1ü ( ) Z
Goto 6
Lbl 2
Disp B
Disp "-
Disp D
Disp "?
B-Dü ( ) E
0ü ( ) F
While EøF
Input F
Y+1ü ( ) Y
If F=0.123456789
Goto 7
End
Disp "CORRECT!
Z+1ü ( ) Z
Goto 6
Lbl 3
Disp B
Disp "*
Disp D
Disp "?
B*Dü ( ) E
0ü ( ) F
While EøF
Input F
Y+1ü ( ) Y
If F=0.123456789
Goto 7
End
Disp "CORRECT!
Z+1ü ( ) Z
Goto 6
Lbl 7
ClrHome
Output(1,1,"TAUX DE REUSSITE
Output(2,1,"ET D'ECHEC
Output(4,1,"REUSSITE:"
Output(4,10,Z
Output(6,1,"ECHEC:"
Output(6,7,Y
Pause
ClrHome
Goto 6
Gui958 le 24/06/2007 à 22:02
J'avais le meme, on pouvais choisir entre les additions soustractions multiplication et division .
craminou le 24/06/2007 à 22:03
ben la c'est pire , c'est aléatoire !! crazy.gif
Gui958 le 24/06/2007 à 22:05
Oué pareil, defois sa tombait 16 que divise 43 ! crazy.gif
craminou le 24/06/2007 à 22:10
le probleme avec le mien c'est que le nombre de chifre et aleatoire , tu peut tomber sur 18545475 * 621585265

... faciiiiiiiiiiile !! ^^
mad67 le 25/06/2007 à 08:08
oui ou tu peux limiter l'aelatoire a 100
Stupid le 28/06/2007 à 11:16
je suis entrain d'en refaire un il va déchirer...
mad67 le 29/06/2007 à 10:13
ah bon si tu te trompe ta plus de programmes
Stupid le 29/06/2007 à 13:11
non pas cette fois^^ quoique si je vais fair eun mode ou c'est possible
Sangohan38 le 29/06/2007 à 17:52
Précise simplement ou il y à le risque d'effacer la mémoire.

Sangohan38
Stupid le 29/06/2007 à 18:06
non en fait ej l'ai posté le programme mais sans la partie qui vires la memoire
mad67 le 30/06/2007 à 10:33
pourquoi sa coute rien de mettre cette ligne en plus sa motive a repondre juste
Stupid le 30/06/2007 à 12:33
ouias ben suffit de rajouter la ligne
binaleat(10^9,0
mad67 le 01/07/2007 à 10:31
oui comme sa sa motiveras le mec a reflechir avant de repondre.