-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Determine la suma de las cifras de un número entero positivo de 4 cifras.
1
2
3
4
5
6
2
3
4
5
6
Proceso SumaDe4Cifras
Escribir Sin Saltar "Ingresa el valor de numero entero:";
Leer numero_entero;
suma <- (numero_entero MOD 10000-numero_entero MOD 1000)/1000+(numero_entero MOD 1000-numero_entero MOD 100)/100+(numero_entero MOD 100-numero_entero MOD 10)/10+numero_entero MOD 10;
Escribir "Valor de suma: ", suma;
FinProceso
Escribir Sin Saltar "Ingresa el valor de numero entero:";
Leer numero_entero;
suma <- (numero_entero MOD 10000-numero_entero MOD 1000)/1000+(numero_entero MOD 1000-numero_entero MOD 100)/100+(numero_entero MOD 100-numero_entero MOD 10)/10+numero_entero MOD 10;
Escribir "Valor de suma: ", suma;
FinProceso