• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Al recibir como dato un número de cuatro dígitos, genere una impresión como la que se muestra a continuación (el número es 6352)
    6
    3
    5
    2

1
2
3
4
5
6
7
8
9
10
11
12
Proceso ImpresionDe4Digitos
    Escribir Sin Saltar "Ingresa el valor de un numero:";
    Leer un_numero;
    digito_1 <- (un_numero MOD 10000-un_numero MOD 1000)/1000;
    digito_2 <- (un_numero MOD 1000-un_numero MOD 100)/100;
    digito_3 <- (un_numero MOD 100-un_numero MOD 10)/10;
    digito_4 <- un_numero MOD 10;
    Escribir "Valor de digito 1: ", digito_1;
    Escribir "Valor de digito 2: ", digito_2;
    Escribir "Valor de digito 3: ", digito_3;
    Escribir "Valor de digito 4: ", digito_4;
FinProceso