-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Ingresar un número de 3 dígitos: Si la suma de sus dígitos es un número múltiplo de 3, mostrar cuánto le falta a la unidad del número para hacer de dos dígitos. Caso contrario, mostrar la potencia de la centena elevado a la decena.
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 OperacionesConDecenasCentenasYUnidades
Escribir Sin Saltar "Ingresa el valor de numero de 3 digitos:";
Leer numero_de_3_digitos;
unidad <- numero_de_3_digitos MOD 10;
decena <- (numero_de_3_digitos MOD 100-unidad)/10;
centena <- (numero_de_3_digitos MOD 1000-numero_de_3_digitos MOD 100)/100;
Si (centena+decena+unidad) MOD 3 = 0 Entonces
resultado <- (10-unidad) MOD 10;
SiNo
resultado <- (centena)^(decena);
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 de 3 digitos:";
Leer numero_de_3_digitos;
unidad <- numero_de_3_digitos MOD 10;
decena <- (numero_de_3_digitos MOD 100-unidad)/10;
centena <- (numero_de_3_digitos MOD 1000-numero_de_3_digitos MOD 100)/100;
Si (centena+decena+unidad) MOD 3 = 0 Entonces
resultado <- (10-unidad) MOD 10;
SiNo
resultado <- (centena)^(decena);
FinSi
Escribir "Valor de centena: ", centena;
Escribir "Valor de decena: ", decena;
Escribir "Valor de resultado: ", resultado;
Escribir "Valor de unidad: ", unidad;
FinProceso