-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Determinar la suma de los N primeros términos de la serie de Fibonacci, y mostrar sus valores considerando que N sea mayor que 1. La secuencia de la serie es el siguiente:0, 1, 1, 2, 3, 5, 8, 13, 21, . . .
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Proceso SumaDeLaSerieDeFibonacci
f1 <- 0;
f2 <- 0;
suma <- 0;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Si i = 1 Entonces
f2 <- 1;
FinSi
termino <- f2;
suma <- suma+f2;
f3 <- f1+f2;
f1 <- f2;
f2 <- f3;
Escribir "Valor de f3: ", f3;
Escribir "Valor de termino: ", termino;
Escribir "";
FinPara
Escribir "Valor de f1: ", f1;
Escribir "Valor de f2: ", f2;
Escribir "Valor de suma: ", suma;
FinProceso
f1 <- 0;
f2 <- 0;
suma <- 0;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Si i = 1 Entonces
f2 <- 1;
FinSi
termino <- f2;
suma <- suma+f2;
f3 <- f1+f2;
f1 <- f2;
f2 <- f3;
Escribir "Valor de f3: ", f3;
Escribir "Valor de termino: ", termino;
Escribir "";
FinPara
Escribir "Valor de f1: ", f1;
Escribir "Valor de f2: ", f2;
Escribir "Valor de suma: ", suma;
FinProceso