Suponga que el peso colombiano está compuesto solo de billetes de las siguientes
denominaciones: $1, $5,
$10, $20, $50, $100, $200, $500, $1000, $2000, $5000, $10000,
$20000, $50000.
Su tarea es escribir un algoritmo que imprima el número mínimo de billetes que se requieren
para obtener un valor dado, discriminando la cantidad de billetes por cada denominació
n.
Por ejemplo, si el valor dado es $145322, el algoritmo debe imprimir lo siguiente (en el
mismo formato)
Para el cambio de $145322 se requieren 10 billetes distribuidos así:
-
2 de $50000
-
2 de $20000
-
1
de $5000
-
1 de $200
-
1 de $100
-
1 de $20
-
2
de $1
Respuestas
Algoritmo Descomponer
Definir Cantidad,B50Mil,B20Mil,B10Mil,B5Mil,B2Mil,BMil,B500,B200,B100,B50,B20,B10,B5,B1 Como Real
Definir Resto50Mil,Resto20Mil,Resto10Mil,Resto5Mil,Resto2Mil,RestoMil,Resto500,Resto200,Resto100,Resto50,Resto20,Resto10,Resto5 Como Real
Escribir "Ingrese Cantidad"
Leer Cantidad
B50Mil=trunc(Cantidad/50000)
Resto50Mil=(Cantidad%50000)
B20Mil=trunc(Resto50Mil/20000)
Resto20Mil=(Resto50Mil%20000)
B10Mil=trunc(Resto20Mil/10000)
Resto10Mil=(Resto20Mil%10000)
B5Mil=trunc(Resto10Mil/5000)
Resto5Mil=(Resto10Mil%5000)
B2Mil=trunc(Resto5Mil/2000)
Resto2Mil=(Resto5Mil%2000)
BMil=trunc(Resto2Mil/1000)
RestoMil=(Resto2Mil%1000)
B500=trunc(RestoMil/500)
Resto500=(RestoMil%500)
B200=trunc(Resto500/200)
Resto200=(Resto500%200)
B100=trunc(Resto200/100)
Resto100=(Resto200%100)
B50=trunc(Resto100/50)
Resto50=(Resto100%50)
B20=trunc(Resto50/20)
Resto20=(Resto50%20)
B10=trunc(Resto20/10)
Resto10=(Resto20%10)
B5=trunc(Resto10/5)
Resto5=(Resto10%5)
B1=trunc(Resto5%5)
Escribir ""
Escribir "El Cambio Queda Distribuido Asi:"
Escribir "Billetes De 50000: ",B50Mil
Escribir "Billetes De 20000: ",B20Mil
Escribir "Billetes De 10000: ",B10Mil
Escribir "Billetes De 5000: ",B5Mil
Escribir "Billetes De 2000: ",B2Mil
Escribir "Billetes De 1000: ",BMil
Escribir "Billetes De 500: ",B500
Escribir "Billetes De 200: ",B200
Escribir "Billetes De 100: ",B100
Escribir "Billetes De 50: ",B50
Escribir "Billetes De 20: ",B20
Escribir "Billetes De 10: ",B10
Escribir "Billetes De 5: ",B5
Escribir "Billetes De 1: ",B1
FinAlgoritmo