-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Permite realizar el retiro de dinero de un cajero electrónico, una vez indicado el monto en múltiplos de 10.000 el programa debe indicar cuál es la cantidad mínima de billetes que debe entregar el cajero. Ejemplo Cantidad $ 80.000 entrega:
1. 50.000
1. de 20.000
1. de 10.000
Sólo debe calcular con cantidad válida de billetes.
1
2
3
4
5
6
7
8
9
10
11
12
2
3
4
5
6
7
8
9
10
11
12
Proceso RetiroDeUnCajeroElectronico
Escribir Sin Saltar "Ingresa el valor de retiro:";
Leer retiro;
billetes_de_10000 <- (retiro-retiro MOD 10000)/10000;
billetes_de_50000 <- (billetes_de_10000-billetes_de_10000 MOD 5)/5;
billetes_de_10000 <- billetes_de_10000 MOD 5;
billetes_de_20000 <- (billetes_de_10000-billetes_de_10000 MOD 2)/2;
billetes_de_10000 <- billetes_de_10000 MOD 2;
Escribir "Valor de billetes de 10000: ", billetes_de_10000;
Escribir "Valor de billetes de 20000: ", billetes_de_20000;
Escribir "Valor de billetes de 50000: ", billetes_de_50000;
FinProceso
Escribir Sin Saltar "Ingresa el valor de retiro:";
Leer retiro;
billetes_de_10000 <- (retiro-retiro MOD 10000)/10000;
billetes_de_50000 <- (billetes_de_10000-billetes_de_10000 MOD 5)/5;
billetes_de_10000 <- billetes_de_10000 MOD 5;
billetes_de_20000 <- (billetes_de_10000-billetes_de_10000 MOD 2)/2;
billetes_de_10000 <- billetes_de_10000 MOD 2;
Escribir "Valor de billetes de 10000: ", billetes_de_10000;
Escribir "Valor de billetes de 20000: ", billetes_de_20000;
Escribir "Valor de billetes de 50000: ", billetes_de_50000;
FinProceso