| Programmation sur une calculatrice TI-82 Stats.fr |
| Auteur |
Message |
Matheuse-magique
Autorisation : Membre
Nb de messages : 2
Inscrit le : Jeu 05 Jan 2012, 15:01
|
Posté le : Jeu 05 Jan 2012, 15:09
|
|
 |
Bonjour à Tous et à Toutes . J'ai besoin d'aide pour un exercice d'un devoir Maison de Mathématiques . Voilà l'énoncé:
1. Demander un nombre; le ranger dans la variable X
2. Demander une valeur entière; la ranger dans la variable p
3. Ranger 0 dans la variable n
4. Effectuer le teste n=p
5. Si Oui afficher X et n. Fin du programme
Si Non, augmenter n de 1; remplacer X par X²-2X+3, revenir à la ligne 4.
Je vous donne seulement la question qui me pose problème: Ecrire sur votre calculatrice (ou sur un logiciel de programmation) un programme qui effectue ces taches.
Je ne suis pas trop forte en ce qui concerne la programmation. Voilà ce que j'ai:
Prompt X
Prompt P
0->N
Et après Je ne sais pas comment faire :/ Merci d'avance pour votre aide!
|
 |
  |
| |
Cytropus
Autorisation : Membre
Nb de messages : 407
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Jeu 05 Jan 2012, 16:41
|
|
|
Salut j'ai fait un prgm mais je sais pas si ton prof veut une boucle ou des Label.
| Code | :Prompt X
:Prompt P
:0->N
:While N=/=P //While se trouve dans [prgm],[5] et =/= se trouve dans[2nde],[math],[2]
:N+1->N
:X^2-2X+3->X
:End
:Disp X,N |
Par la suite je te conseil de faire tes DM par toi même 
PS: tu n'est pas obligée de t'inscrire pour poster des sujets sur ce site 
----------------------
Le nouveau site de tout82 |
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 05 Jan 2012, 16:47
|
|
|
Je n'ai pas écrit assez vite 
Mon approche est plus complète  mais aussi plus compliquée. 
Pour plus d'infos il n'y a qu'à demander mais il y a aussi la section article du forum pour apprendre des choses.
----
S'il avait été juste question de saisir des nombres tu aurais pu écrire Prompt X,P
Mais ici tu veux que P soit entier.
Deux solutions :
-réclamer que la valeur soit entière
| Code | | Input "VALEUR ENTIERE:",P |
-effectuer un test pour imposer un entier. (Tu peux même tronquer d'office le nombre pour obtenir un entier.)
iPart(P)=P signifie "partie entière(P)=P"
fPart(P)=0 signifie "pas de partie décimale"
iPart se trouve dans le menu maths et se traduit par ent ou partEnt
fPart se trouve aussi dans maths et se traduit par parDéc
Pour utiliser ces tests
| Code | Repeat not(iPart(P
// not( se trouve dans le menu 2nde+maths et signifie "=0"
// Repeat se trouve dans prgm
Input "ENTIER:",P
End // se trouve dans prgm |
Repeat effectue le test jusqu'à ce qu'il soit vrai.
Un test simple s'effectue avec la fonction If du menu prgm.
| Code | If condition
une seul action
// ou bien
If condition
Then
une ou plusieurs actions
End |
Un test à deux sorties s'effectue avec If, Then, Else et End.
| Code | If condition
Then
actions si condition vraie
Else
actions si condition fausse
End |
L'énoncé est toutefois mal présenté à cause de l'instruction "revenir à la ligne 4".
Pour sauter d'un endroit à un autre on peut utiliser "Goto 1" et "Lbl 1".
Chaque fois qu'un "Goto AA" est lu la calculatrice cherche le "Lbl AA" sans lire le reste.
Voici ce que cela donne mais c'est très moche. (cf la solution plus loin)
| Code | Lbl 1
If N=P
Then
Disp X,N
Stop
Else
N+1->N
X^2-2X+3->X
Goto 1 // ce Goto peut poser des problèmes (voir la rubrique aricle)
End // ce End devient innutile à cause du Goto et du Stop |
Pour effectuer un test en boucle il vaut mieux utiliser une fonction comme Repeat ou While. (plus d'infos dans la section article du forum)
Ici While(tantque) est assez bien adaptée mais il faut avoir une seule des deux actions dans la boucle ou bien ajoûter un second test.
Ma solution est d'intervertir les sorties puis d'éjecter l'instruction Disp à la fin.
| Code | While X-N // X-N est pareil qu'écrire X[différent de]N
N+1->N
X^2-2X+3->X
End
Disp X,N |
Au final cela fera :
| Code | Prompt X
Repeat not(iPart(P
Input "ENTIER:",P
End
0->N // DelVar N convient aussi
While X-N // X-N est pareil qu'écrire X[différent de]N
N+1->N
X^2-2X+3->X
End
Disp X,N |
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
Cytropus
Autorisation : Membre
Nb de messages : 407
Inscrit le : Lun 07 Nov 2011, 12:09
|
Posté le : Jeu 05 Jan 2012, 16:55
|
|
|
Tu sais linkakro si elle demande de l'aide sur ce forum pour un prgm comme ça...
Tu doit l'avoir noyer avec tes infos  (bien que très interresant )
Si elle se rammene en cours avec ton prog elle se fera griller à coup sûr par son prof (évidemment je prend en fait le compte que son prof de math ne la voit pas avec 80% du temps comme le mien
----------------------
Le nouveau site de tout82 |
| |
|
| |
Matheuse-magique
Autorisation : Membre
Nb de messages : 2
Inscrit le : Jeu 05 Jan 2012, 15:01
|
Posté le : Jeu 05 Jan 2012, 18:24
|
|
|
Merci beaucoup pour vos messages! Vous m'avez vraiment beaucoup aidé! C'est vrai que linkakro a apporté des informations très interessantes, mais il est vrai compliquées!
Je connaissais déjà "If" "Then" "Else" "End" mais Je ne savais vraiment plus comment il fallait les utiliser .. Merci beaucoup!
|
| |
|
| |
linkakro
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Jeu 05 Jan 2012, 18:45
|
|
|
Content que tu sois contente.
Bonne chance pour la suite, on est toujours là au cas-où.
----------------------
ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
| |
|
| |
