Algorithme aide!!!!

Fermé
infobens - 8 sept. 2004 à 14:45
 Time RUNNER - 10 sept. 2004 à 10:37
salut une fois je suis plus que content de participer a cette forum
mon problème est la suivante et je veux de l'aide avec ceci:
la sequence des nombres suivants F0=0,F1=1,F2=1,F3=2,F4=3,
F5=5,F6=8,F7=13 ecrire un algorithme qui calcule et imprime les valeurs des 50 premiers nombres apres avoir initialiser deux variables F0----o et F1---1.
svp aidez moi car j'ai grand besoin.
merci !!!

6 réponses

JSS Messages postés 3745 Date d'inscription jeudi 22 avril 2004 Statut Contributeur Dernière intervention 17 décembre 2004 31
8 sept. 2004 à 14:48
0
Tu veux donc qu'on écrive l'algo qui calcule les termes de la suite de Fibonacci ?

En quel langage ?
0
salut mec merci de penser a moi
tu peux le faire en pascal ou bien ecrire tout simplement l'algorithme.
merci mille merci !!!!
0
Time RUNNER > INFOBENS
10 sept. 2004 à 10:37
j'ai fait du pascal en 1996 donc ça devrait ressembler à ça (au fautes de syntaxe prêt...):

/*Fonction Fibo

u(0) = 1
u(1) = 1
u(n) = u(n-1)+u(n-2)

*/

FUNCTION Fibo(INTEGER a, INTEGER b, INTEGER N) AS INTEGER
if n==1
Fibo = a;
else
if n==1
Fibo = b;
else
Fibo = Fibo(b, a+b, n-1);
end;
end;

END;

/**/

PROGRAM
INTEGER U0 = 1;
INTERER U1 = 1;

INTEGER n = 7; /* par exemple*/

INTEGER Un = Fibo(U0, U1, n);

writeline('U' , n , '=' , Un);


END;
0
En quel langage?
En langage mathématique, non?
Ah c pas ça?
Euh ptêt bien en langage TAMP :
"Travaillez A Ma Place"
0
blux Messages postés 24878 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 25 mars 2023 3 311
9 sept. 2004 à 16:01
ben non, c'est en algo...

tant que pas 50 faire
additionner les deux derniers termes et les mettre dans l'antépénultième qu'on additionnera avec l'autre
pis c'est tout
fin tant que

A+ Blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Hello, voila l'algo en récursive en plus. Sauf erreur de ma part, il devrait tourner. Si jamais c'est du java.

public int fib(int nb)
{

/* Clause de finitude */
if (nb < 3)
{
return 1 ;
}

/* Pas récursif */
return fib(nb-1) + fib(nb-2) ;
}
Bonne soirée.

Fom
0
Hello !

Une version (lente) en Ada 95 :

with text_io;
procedure suite_de_Fibonacci is
function fibonacci(N : in natural) return natural is
begin
case N is
when 0 => return 0;
when 1..2 => return 1;
when others => return fibonacci(N -1) + fibonacci( N - 2);
end case;
end;

begin
-- 50 premiers nombres :
for N in 0..49 loop
text_io.put_line(natural'image(Fibonacci(N)));
end loop;
end;
0