-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Se desea saber cuantos meses han transcurrido entre dos años cualesquiera dados.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
2
3
4
5
6
7
8
9
10
11
12
13
14
Proceso MesesEntre2Anos
Escribir Sin Saltar "Ingresa el valor de ano 1:";
Leer ano_1;
Escribir Sin Saltar "Ingresa el valor de ano 2:";
Leer ano_2;
meses <- 0;
Si ano_1>ano_2 Entonces
meses <- 12*(1+ano_1-ano_2);
FinSi
Si ano_1<ano_2 Entonces
meses <- 12*(1+ano_2-ano_1);
FinSi
Escribir "Valor de meses: ", meses;
FinProceso
Escribir Sin Saltar "Ingresa el valor de ano 1:";
Leer ano_1;
Escribir Sin Saltar "Ingresa el valor de ano 2:";
Leer ano_2;
meses <- 0;
Si ano_1>ano_2 Entonces
meses <- 12*(1+ano_1-ano_2);
FinSi
Si ano_1<ano_2 Entonces
meses <- 12*(1+ano_2-ano_1);
FinSi
Escribir "Valor de meses: ", meses;
FinProceso