Autorisation : Membre
Nb de messages : 132
Inscrit le : Mer 03 Déc 2014, 14:13
Posté le : Mar 01 Mar 2016, 14:08
je te soumet ma version ^^
Code
EffEcr
entAléat(1,3->I
Disp "Pierre [deux espaces] (1)","Feuille [un espace] (2)","Ciseaux [un espace] (3)
Input "choix=?",P
EffEcr
If P-1=I ou P+2=I:Output(3,4,"Gagné
If P+1=I ou P-2=I:Output(3,4,"Perdu
If P=I:Output(3,4,"égalité
[a partir de là c'est du bonus]
Output(4,1,"vous:
If P=1:Output(4,7,"Pierre
If P=2:Output(4,7,"Feuille
If P=3:Output(4,7,"Ciseaux
Output(5,1,"I.A.:
If I=1:Output(5,7,"Pierre
If I=2:Output(5,7,"Feuille
If I=3:Output(5,7,"Ciseaux
---------------------- futur analyste programmeur possesseur d'une TI 82 Plus toute neuve
Autorisation : Membre
Nb de messages : 37
Inscrit le : Lun 29 Fév 2016, 14:12
Posté le : Mar 01 Mar 2016, 16:00
Oui ce n'est pas mal effectivement, en plus c'est plus court.
Je suis quand même content d’avoir fais mon programme par moi même.
Mais le tien est très bien
Autorisation : Membre
Nb de messages : 504
Inscrit le : Ven 07 Déc 2012, 20:09
Posté le : Mar 01 Mar 2016, 19:42
Petite astuce pour t'améliorer : lorsqu'il n'y a qu'une ligne de conséquence après un If, tu peux te passer du Then et du End (sauf en cas de Else bien évidemment). Pour en apprendre plus, tu peux t'aider du tuto dans ma signature
Autorisation : Membre
Nb de messages : 132
Inscrit le : Mer 03 Déc 2014, 14:13
Posté le : Ven 04 Mar 2016, 23:55
Citer : EDG
Oui ce n'est pas mal effectivement, en plus c'est plus court.
Je suis quand même content d’avoir fais mon programme par moi même.
Mais le tien est très bien
j'ai fais le miens par moi même aussi qu'est ce que tu crois
---------------------- futur analyste programmeur possesseur d'une TI 82 Plus toute neuve
