-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Genere la siguiente serie 1,2,4,7,11,16.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Proceso Serie12471116
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
suma <- 1;
SiNo
suma <- suma+i-1;
FinSi
fi <- suma;
Escribir "Valor de fi: ", fi;
Escribir "";
FinPara
Escribir "Valor de suma: ", suma;
FinProceso
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
suma <- 1;
SiNo
suma <- suma+i-1;
FinSi
fi <- suma;
Escribir "Valor de fi: ", fi;
Escribir "";
FinPara
Escribir "Valor de suma: ", suma;
FinProceso