Forum

Catégorie : Support
Forum : TI-82 STATS
Vues : 1063
Réponses : 3
Type : discussion
Etat : réponses autorisées
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.

Programme TI-82

L33t le 23/02/2012 à 18:38
Bonjour, étant élève de seconde j'ai un algorythme à créé. Cependant je n'y arrive pas et je vous prie donc de m'aider.

Metre 0 dans les variables C et D
Pour I allant de 1 à 1000
EntierAléatoireentre(1;4)+EntierAléatoireentre(1;4)+EntierAléatoireentre(1;4) dans la variable S
Si S=6 alors metre C+1 dans la variable C. FinSI
Si S=7 alors metre D+1 dans la variable D. FinSI
FinPour
Afficher C/1000 et D/1000
Fin
tapenad le 23/02/2012 à 18:53
Code
:0->C
:0->D
:For(I,1,1000
:EntAleat(1,4)+EntAleat(1,4)+EntAleat(1,4)->S
:If S=6
:C+1->C
:If S=7
:D+1->D
:End
:DispC/1000,D/1000

et voila...
linkakro le 23/02/2012 à 20:12
Rien à redire sur l'exemple de tapenade. happy.gif

Toutefois il peut être bon d'expliquer l'abscence de traduction de FinSI.
Dans une Ti deux notations sont possibles. La première est toujours valable et la seconde s'utilise seulement quand il n'y a qu'une seule action après le If.
Code
If ... // condition
Then
... // actions
End
Code
If ... // condition
... // action unique


Il est possible d'effectuer quelques optimisations facultatives. (pas toujours conseillié en examen, ça dépend du niveau du prof)
En voici deux.
Code
:EffVar CEffVar D
:For(I,1,1000
:somme(EntAleat(1,4,3->S
:If S=6
:C+1->C
:If S=7
:D+1->D
:End
:Disp C/1000,D/1000
sandro le 23/02/2012 à 20:27
Si tu tiens vraiment à optimiser, autant faire ça:
Code
:EffVar CEffVar DFor(I,1,E3               //le E des puissances de 10
:somme(EntAleat(1,4,3->S
:If S=6
:C+1->C
:If S=7
:D+1->D
:End
:Disp CE-3,DE-3          //le E des puissances de 10


Sandro
PS : je te déconseille d'optimiser comme ça si ton prof ne s'y connait pas trop en calculatrices.
Avertissement :
Il s'agit d'une page optimisée pour la navigation mobile. Voir la page originale.