Gamme TI-82



Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 234

Warning: Illegal string offset 'code' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 235

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325

Warning: Illegal string offset 'pagination' in /var/www/sdb/e/a/tout82/forum/sujet.php on line 325
Poster un nouveau sujet Poster une réponse
aide pour un programme
Auteur Message
Lebretonenquesti



Autorisation : Membre
Nb de messages : 4
Inscrit le : Sam 07 Nov 2015, 20:55
Posté le : Dim 08 Nov 2015, 12:31   Citer 

Déjà, bonjour a tous

Alors voici mon problème: Jai tenté je dis bien tenté de créer un programme ou le but est de trouver un nombre entre un et cent. Cependant il ne fonctionne pas comme je le désirerais. Si quelqu'un pourrait m'aider ce serait laugh.gif génial laugh.gif
Voici le programme :
(différent de) signifie le = barré


Code

:entAléat(0,100)->X
:1->E
:Disp"choisissez un","nombre","entre 0 et 100"
:goto A
:lbl A
:prompt A
:if A=X
:then goto W
:if A(différent de)X
:then
:goto F
:lbl F
:if A>X
:then
:goto G
:else
:if A<X
:then
:goto P
:lbl G
:disp "trop grand"
:E+1->E
:goto A
:lbl P
:disp "trop petit"
E+1->E
:goto A
:lbl W
:Disp "bien joué !"
:Disp E
:repeat



Aurait je suis en 2nd du coup si vous vous une erreur qui creve les yeux soyez un peu indulgent merci godgrace.gif
Jai oublié de dire que j'ai une ti82 Advanced

 Adresse email Haut de page Bas de page 
 
Mingerton



Autorisation : Membre
Nb de messages : 506
Inscrit le : Ven 07 Déc 2012, 20:09
Posté le : Dim 08 Nov 2015, 14:59   Citer 

Oula, va falloir se pencher un peu sur l'algo pour comprendre pourquoi ça fonctionne pas ! Regarde les paragraphes sur les boucles et les conditions pour en comprendre le principe (dans le tuto de ma signature pour apprendre le Basic).

Les labels : à éviter autant que possible, surtout quand c'est inutile.

Voici, à terme, ce à quoi tu pourrais arriver :

Code
EffVar AEffVar EentAléat(1,100->X
Repeat A=X
Prompt A
If A<X
Disp "TROP GRAND
If A>X
Disp "TROP PETIT
E+1->E
End
Disp "BIEN JOUE !",E



----------------------
Mes articles
Mes programmes en ligne (je termine peu de projets)

Guide traduction Algo-Basic, par Linkakro
Catalogue des fonctions 82/83/84 FR/EN
 Adresse email Haut de page Bas de page 
 
Lebretonenquesti



Autorisation : Membre
Nb de messages : 4
Inscrit le : Sam 07 Nov 2015, 20:55
Posté le : Lun 09 Nov 2015, 18:21   Citer 

D'accord merci bigmouth.gif
Je vais essayer de faire un programme de avec plusieurs niveau de difficultés et je te dirais après

 Adresse email Haut de page Bas de page 
 
Lebretonenquesti



Autorisation : Membre
Nb de messages : 4
Inscrit le : Sam 07 Nov 2015, 20:55
Posté le : Mar 10 Nov 2015, 20:48   Citer 

Voila! J'ai enfin finaliser le programme godgrace.gif
Dites moi ce que vous en pensez
Je me suis dans le fond inspiré du programme du tuto d'apprentissage de programmation de Openclassroom


Code

menu("PLUS OU MOINS","ENTRE 0 ET 10",1,"ENTRE 0 ET 100",2,"PERSONALISÉ",P)
Lbl1
10->M
1->N
0->C
EntAleat(N,M->A
RepeatC=A
Input "C=",C
If C>A
Disp "moins"
If C<A
Disp "plus"
End
Disp "gagné"
Stop
Lbl2
100->M
1->N
0->C
EntAleat(N,M,->A
RepeatC=A
input "C=",C
if C>A
Disp "moins"
If C<A
Disp "plus"
End
If C=A
Disp "gagné"
Stop
Lbl P
Input "limite de ton choix",I
I->M
1->N
0->
EntAleat(N,M,->A
Repeat C=A
Input"C=",C
If C>A
Disp "moins"
If C<A
Disp "plus"
End
If C=A
Disp "gagné"
Stop



Woila

 Adresse email Haut de page Bas de page 
 
Mingerton



Autorisation : Membre
Nb de messages : 506
Inscrit le : Ven 07 Déc 2012, 20:09
Posté le : Mar 10 Nov 2015, 21:03   Citer 

Il y a bien plus simple ! Dans tes labels tu ne règles que la valeur de l'intervalle, et le reste est commun. Mettre 3 fois le même code dans 3 labels différents c'est vraiment mnésiphage winkle.gif

Sinon, pas Stop mais Return. Dans la pratique ça va rien changer, mais à un niveau plus avancé c'est plus sûr.

----------------------
Mes articles
Mes programmes en ligne (je termine peu de projets)

Guide traduction Algo-Basic, par Linkakro
Catalogue des fonctions 82/83/84 FR/EN
 Adresse email Haut de page Bas de page 
 
Lebretonenquesti



Autorisation : Membre
Nb de messages : 4
Inscrit le : Sam 07 Nov 2015, 20:55
Posté le : Mar 10 Nov 2015, 21:16   Citer 

D'accords je vais modifier cela et je te dirais plus tard, merci pour l'aide godgrace.gif

 Adresse email Haut de page Bas de page 
 
Un progammeur



Autorisation : Membre
Nb de messages : 4
Inscrit le : Mer 28 Sep 2016, 21:45
Posté le : Mer 28 Sep 2016, 22:17   Citer 


Citer : Mingerton
Oula, va falloir se pencher un peu sur l'algo pour comprendre pourquoi ça fonctionne pas ! Regarde les paragraphes sur les boucles et les conditions pour en comprendre le principe (dans le tuto de ma signature pour apprendre le Basic).

Les labels : à éviter autant que possible, surtout quand c'est inutile.

Voici, à terme, ce à quoi tu pourrais arriver :

Code
EffVar AEffVar EentAléat(1,100->X
Repeat A=X
Prompt A
If A<X
Disp "TROP GRAND
If A>X
Disp "TROP PETIT
E+1->E
End
Disp "BIEN JOUE !",E







Exactement c'est aussi ce que j'ai fait.
Quand tu programme parle en français en faisant des phrases de ce que tu compte faire (moi ça m'aide) et comme ca tu ne t'embrouille pas et c'est plus clair winkle.gif

PS : je suis en 1ere et en 2nde je faisais des trucs comme ça. Ce n'est ni la classe ni l'âge qui compte c'est ton entrainement.

Bonne continuation happy.gif

 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2019 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink