Algorithme aide!!!!

infobens -  
 Time RUNNER -
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

  1. Time RUNNER
     
    Tu veux donc qu'on écrive l'algo qui calcule les termes de la suite de Fibonacci ?

    En quel langage ?
    0
    1. INFOBENS
       
      salut mec merci de penser a moi
      tu peux le faire en pascal ou bien ecrire tout simplement l'algorithme.
      merci mille merci !!!!
      0
      1. Time RUNNER > INFOBENS
         
        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
  2. Cqqn
     
    En quel langage?
    En langage mathématique, non?
    Ah c pas ça?
    Euh ptêt bien en langage TAMP :
    "Travaillez A Ma Place"
    0
  3. blux Messages postés 2051 Date d'inscription   Statut Modérateur Dernière intervention   3 455
     
    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
  4. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  5. Fom
     
    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
  6. Jolkdarr
     
    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