Algoritmia - Series

 
Vista:

Series

Publicado por Alfredo (1 intervención) el 28/01/2004 17:46:38
Necesito un algoritmo mediante el cual pueda ingresar los 2 primeros numeros,para despues crear un serie de n numeros mediante los cuales esta se cree en base a la suma de los 2 numeros anteriores.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Series

Publicado por IDM (10 intervenciones) el 28/01/2004 21:09:59
si le sirve en diagrama de flujo escribame al correo y se lo envio.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Series

Publicado por Minerva (2 intervenciones) el 16/03/2004 18:29:35
Eso es la serie Fibonacci, puedes hacerlo mendiante una función recursiva o una función iterativa.
No sé que lenguaje usas, pero... te mando un ejemplo.

La solución recursiva sería:

Function Fibonacci(n:LongInt):LongInt;
Begin
if (n=1) or (n=2) Then Fibonacci:=1
else Fibonacci:=Fibonacci(n-1)+Fibonacci(n-2);
end;
Una solución iterativa se vería de la siguiente manera:

Function Fibonacci(n:LongInt):LongInt;
Var
a,b,aux,k:LongInt;
Begin
a:=1;
b:=1;
For k:=2 To n do
begin
aux:=b;
b:=a+b;
a:=aux;
end;
Fibonacci:=a;
end;
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar