Gamme TI-82


Poster un nouveau sujet Poster une réponse
Création Programme Aide
Auteur Message
Calculatrice-Player
Invité
Posté le : Lun 30 Nov 2009, 18:39   Citer 

Bonjour !
J'aimerais créer le programme suivant mais je n'y arrive pas :

ENTREE :
Demande 3 chiffres à l'utilisateur

INITIALISATION
Code à trouver : 378

TRAITEMENT :
3 FOIS :
Demande du code
Si code bon : Afficher "Porte Ouverte" et Fin programme
Si mauvais : Afficher "Porte non-ouverte"

SORTIE : Si code mauvais après 3 essais, afficher "VA VOIR AILLEURS"


J'espère que vous pourrez m'aider !

  Haut de page Bas de page 
 
Stupid



Autorisation : Membre
Nb de messages : 769
Inscrit le : Jeu 28 Sep 2006, 18:42
Posté le : Lun 30 Nov 2009, 19:19   Citer 

:386->N
:For(A,1,3
:Input "CODE:",X
:If X=N
:Goto A
:Disp "RATE
:End
:Disp "GTFO NIGGER
:Stop
:Lbl A
:Disp "BIEN JOUE

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Mar 01 Déc 2009, 18:28   Citer 

Je vois pas trop mais je pense que tu devrais faire avec des variables différentes... ou au lieu d'un For tu mets un Label/Goto avec une variable que fait +1 a chaque fois, et quand la variable est égale a 3 tu fais un autre Goto "va te faire voir", par exemple... apres si tu veux absolument faire comme ça je peux rien pour toi ^^

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Mar 01 Déc 2009, 18:34   Citer 

Donc, du style:


Code

386->N
0->G
Lbl 1
If G=3:Goto L
Input "CODE:",X
If X[pas égal à]N:Then
G+1->G
Disp "RATE!
Goto 1
End
If X=N:Goto 2
Lbl 2
Disp "BRAVO!
Stop
Lbl L
Disp "LOOSER!
Stop



Sinon, je vois pas trop l'interet de ton programme, mais voila loupe.gif

 Adresse email Haut de page Bas de page 
 
-Coco-



Autorisation : Membre
Nb de messages : 149
Inscrit le : Sam 28 Nov 2009, 16:09
Posté le : Mar 01 Déc 2009, 18:36   Citer 

Et apres tu changes l'intérieur des Disp ^^

 Adresse email Haut de page Bas de page 
 
dysto



Autorisation : Membre
Nb de messages : 200
Inscrit le : Mar 20 Oct 2009, 18:58
Posté le : Mar 01 Déc 2009, 19:07   Citer 

Pourquoi mettre 386 dans une lettre ???
Je verrai plus simplement :If X[différent de]386 et :If X=386 !
Non ?
Sinon son programme n'a pas vraiment d'intérêt, du moins en l'état, mais peut-être est-ce un exercice demandé par un professeur ?

 Adresse email Haut de page Bas de page 
 
homer__simpsons



Autorisation : Membre
Nb de messages : 2
Inscrit le : Mer 22 Déc 2010, 11:26
Posté le : Mer 22 Déc 2010, 12:41   Citer 

Reponse Tardive...


Code

:0->C:378->A
:Repeat A=B or C=3
:Input "Code: ",B
:If B=A
:Then
:Disp "Porte ouverte
:Else
:Disp "Porte non-","Ouverte
:End
:C+1->C
:End
:If B≠A:Disp "Va voir ailleurs"



J'ai compressé le prgm au maximum... Dit ci il y a un truc que tu comprend pas!!

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
patate007



Autorisation : Membre
Nb de messages : 118
Inscrit le : Mar 09 Fév 2010, 8:49
Posté le : Mer 22 Déc 2010, 14:28   Citer 

Ca me parrait pas mal ça, court et simple :

Code
:For(I,1,3
:Input "CODE:",A
:If A=378:Then
:Disp "PORTE OUVERTE
:Stop:End
:If A!=378:Disp "PORTE NON-","OUVERTE
:End
:Disp "VA VOIR AILLEUR



!= correspond au égal barré winkle.gif

----------------------
Joyeuse Pâques winkle.gif
 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3388
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Mer 22 Déc 2010, 22:59   Citer 

Sinon, ce sujet date d'un an, ça fait tache de remonter de vieux sujets.

Sangohan38

 Adresse email Haut de page Bas de page 
 
Akmdad



Autorisation : Membre
Nb de messages : 726
Inscrit le : Mar 22 Jui 2010, 21:03
Posté le : Mer 22 Déc 2010, 23:23   Citer 

oui, t'a raison sangohan, et je m'y connait dans ce rayon godgrace.gif

----------------------
retrouvez moi sur twitter!!!


j'ai une ti 82 stats fr et une ti89 titanium happy.gif
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
patate007



Autorisation : Membre
Nb de messages : 118
Inscrit le : Mar 09 Fév 2010, 8:49
Posté le : Jeu 23 Déc 2010, 0:37   Citer 

OMG c'est vrai ! Oo'
Je suis désolé, ça m'arrive souvent =x

----------------------
Joyeuse Pâques winkle.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