Estoy haciendo un codigo que simule el funcionamiento de una maquina de colectivo y no se como dar el vuelto por monedas suponiendo que tengo solo monedas de 0.5, 0.10, 0.25, 0.50 y 1. Como hago para imprimir solo las monedas necesarias para llegar al vuelto.
Hasta aca llegue con el codigo:
<%
cant = request.form ("cant")
val = request.form ("val")
m1 = request.form ("m1")
m2 = request.form ("m2")
m3 = request.form ("m3")
m4 = request.form ("m4")
m5 = request.form ("m5")
monedas = array (m1,m2,m3,m4,m5)
import = val * cant
response.Write("Cantidad de boletos: " & cant & "<br>" & "El valor del boleto es: $" & val & "<br>" & "El importe a cobrar es: $" & import & "<br>")
num = 0
For x = 0 to 4
If (IsNumeric(monedas (x)) = false) then
ElseIf monedas (x) = 0 then
Else
num = num -- monedas (x)
response.Write("Usted ingreso: $" & monedas (x) & "<br>")
End If
Next
response.write ("<br>")
If (IsNumeric(num) = false) then
ElseIf num < import then
response.Write("Total ingresado: $" & num & "<br>")
response.write ("Debe ingresar monedas" & "<br>")
Else
response.Write("Total ingresado: $" & num & "<br>")
End If
%>
Graciassssss
ahora si que me obigas a ir al RAE (si es que existe)
y mis principios no me permiten colocar ni una de las cientos de ligas que tienen los diferentes algoritmos (claro, dificilmente implementados en ASP) para este ejercicio.
no te conocía ese vocabulario
)
"ahí nos vidrios mis cuadernos, este tiro estuvo para que la chota lo cerrara , pero su paciencia se vicentió, buena onda del carnal"
lo cerrara, pero fue un gesto amable del amigo.
