-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Ingresar un sólo número entero de 3 cifras. El algoritmo deberá descomponer el número en "centena", "decena" y "unidad".
- Si la suma de la cifra que representa a la "centena" más la "unidad" es PAR, entonces deberá mostrar el resultado del triple de la decena + doble de la centena – unidad.
- Si la suma de la cifra que representa a la "centena" más la "unidad" es IMPAR, entonces deberá mostrar el resultado de la mitad de la decena + triple de la centena – un quinto de la unidad.
Muestre el resultado en detalle, los números descompuestos y el resultado de la operación.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Proceso OperacionesConCentenaDecenaYUnidad
Escribir Sin Saltar "Ingresa el valor de numero entero:";
Leer numero_entero;
unidad <- numero_entero MOD 10;
decena <- (numero_entero MOD 100-numero_entero MOD 10)/10;
centena <- (numero_entero MOD 1000-numero_entero MOD 100)/100;
Si (centena+unidad) MOD 2 = 0 Entonces
resultado <- decena*3+centena*2-unidad;
SiNo
resultado <- decena/2+centena*3-unidad/5;
FinSi
Escribir "Valor de centena: ", centena;
Escribir "Valor de decena: ", decena;
Escribir "Valor de resultado: ", resultado;
Escribir "Valor de unidad: ", unidad;
FinProceso
Escribir Sin Saltar "Ingresa el valor de numero entero:";
Leer numero_entero;
unidad <- numero_entero MOD 10;
decena <- (numero_entero MOD 100-numero_entero MOD 10)/10;
centena <- (numero_entero MOD 1000-numero_entero MOD 100)/100;
Si (centena+unidad) MOD 2 = 0 Entonces
resultado <- decena*3+centena*2-unidad;
SiNo
resultado <- decena/2+centena*3-unidad/5;
FinSi
Escribir "Valor de centena: ", centena;
Escribir "Valor de decena: ", decena;
Escribir "Valor de resultado: ", resultado;
Escribir "Valor de unidad: ", unidad;
FinProceso