SoloCodigo

Programación Específica => Diseño de Algoritmos => Mensaje iniciado por: gust100501 en Sábado 15 de Abril de 2006, 17:05

Título: Algoritmo En Sl
Publicado por: gust100501 en Sábado 15 de Abril de 2006, 17:05
Necesito calcular la suma de los terminos de la serie de Fibonacci cuyos valores se encuentran entre 100 y 10000.
Hasta ahora lo que pude hacer fue esto:
var A,B,F,c: numerico
inicio
imprimir(1,"\t")
A=0
B=1
               desde c= 1 hasta 99{
   F=A+B
   imprimir(F)
   A=B
   B=F}
fin.
con esto puedo imprimir toda la serie pero necesito cambiar algunos datos para poder imprimir la suma.
Si alguien puede ayudarme con esto estaria muy agradecido

Gustavo  :)
Título: Re: Algoritmo En Sl
Publicado por: berniebolso en Sábado 8 de Julio de 2006, 16:39
Por que  no probas con un método que te devuelva los elementos de la serie de fibonacci, que se llame en cada iteración del for, y que se vaya guardando en una variable suma. Claro?
Título: Re: Algoritmo En Sl
Publicado por: ing_marco en Sábado 8 de Julio de 2006, 23:27
Mira podrias hacer una funcion que determine la suma de la serie Fibbo hasta N,
esta funcion seria de este modo:

Funcion sumaFibbo(Limite)
{
a=0;
b=1;
F=0;
Suma=0;
mientras (F<Limite)
{
F=a+b;
a=b;
b=F;
Suma=Suma+F;
}
return Suma;
}

Cuando tienes esa funcion ahora creas otra funcion k determina la suma dentro de un rango:

Funcion sumaFibboRango(LimiteInf,LimiteSup)
{
return (sumaFibbo(LimiteSup)-sumaFibbo(LimiteInf));
}

Bueno eso seria masomenos el algoritmo para que calcules lo que necesitas.

Seguro que por alli tendras algun problema con poner "menor o igual" o "menor", cuando lo pruebas te daras cuenta a que me refiero.
 :hola: