Poster un nouveau sujet Poster une réponse
Probleme programme fibonacci
Auteur Message
oddfer
Invité
Posté le : Sam 16 Oct 2010, 13:19   Citer 

Bonjour,
Voila en fait j'ai un problème avec un programme que je doit créer sur la suite de Fibonacci voici le code que j'ai déjà tapé:
PS: je dois faire montrer que les 6 premiers termes non nul de la suite en les calculant.



Code
:1->A
:0->B
:Lbl 1
:B+A->A
:A->B
:For(I,1,6):Disp B
:Goto 1
:End



  Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Sam 16 Oct 2010, 13:42   Citer 

Le problème viens des deux dernières lignes de ton code car le for exécute le goto et du coup, il est réexécuté.
A mon avis le programme doit plutôt être comme ça:

Code
1->A
0->B
For(C,1,6
B+A->A
A->B
Disp B
End



Sangohan38

 Adresse email Haut de page Bas de page 
 
OdDfEr



Autorisation : Membre
Nb de messages : 1
Inscrit le : Sam 16 Oct 2010, 13:20
Posté le : Sam 16 Oct 2010, 13:49   Citer 

Merci, le programme fonctionne maintenant!

Edite: Sauf que c'est pas la suite de fobonacci :\'(

 Adresse email Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Sam 16 Oct 2010, 14:52   Citer 


Code
Disp 1,1
1->A
1->B
For(C,3,6
A+B->D
B->A
D->B
Disp B
End



Le dernier problème venait du fait que tu prenais la valeur de A alors qu'elle avait été transformée entre temps par A+B->A

----------------------
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
 Adresse email Haut de page Bas de page 
 
Kylar
Invité
Posté le : Mer 04 Avr 2012, 18:48   Citer 

c possible de mettre plus que les 6 premiers et mettre des pauses entre chaque chiffre ?

  Haut de page Bas de page 
 
Persalteas



Autorisation : Membre
Nb de messages : 2164
Inscrit le : Sam 23 Jan 2010, 20:09
Posté le : Mer 04 Avr 2012, 19:26   Citer 


Code

Input "LIMITE ? ",L
Disp 1,1
1->A
1->B
For(C,3,L
A+B->D
B->A
D->B
Pause B
End



 Adresse email Haut de page Bas de page 
 
Kylar
Invité
Posté le : Dim 08 Avr 2012, 19:49   Citer 

merci happy.gif

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





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