Inicio > Visual FoxPro > cesarpech > No le entiendo a este ejercicio que me dejaron

No le entiendo a este ejercicio que me dejaron

Experto:
Usuario:
Fecha: 07/11/2007
Valoración: Categoría: Visual FoxPro
07/11/2007
yeye18, usuario preguntando en Visual FoxPro
Usuario
Se tiene un cajero automático el cual permite manipular cierta cantidad de dinero para lo cual dispone de los siguientes billetes: S/. 10.00, S/. 20.00, S/. 50.00, S/. 100.00 y S/. 200.00. Elaborar una aplicación que permita la lectura de la cantidad a retirar la cual debe ser múltiplo de 10 (caso contrario debe solicitar al usuario que ingrese un valor correcto, no debe aceptar la lectura de valores que no cumplan esta condición). La aplicación debe indicar el menor número de billetes a utilizar.
Ya tengo el formulario listo,Personalize las etiquetas y cuadros de texto, pero no se que codigo ingresar para que me de el resultado, por favorr... ayudame
07/11/2007
yeye18, experto respondiendo en Visual FoxPro
Experto
*tienes que hacer unas divisiones
*constantes
*Ejemplo: (lo pondrias en tu boton de "aceptar")

monto=1800 &&puedes poner el valor de tu txt donde capturas el valor (toiene que ser numerico.

if (monto % 10) # 0
MESSAGBBOX('cantidad no valida, no se puede dividir en las denominaciones disponibles',16,'Aviso')
RETURN
endif
endif


ARRAY denom(5)
ARRAY oper(5)

denom(1) = 200
denom(2) = 100
denom(3) = 50
denom(4) = 20
denom(5) = 10

for i=1 to 5
oper(i) = INT(Monto / denom(i))
monto = monto - oper(i)
next

*en el array "oper" vas a tener la forma en que darias el dinero, en las denominaciones.
*
07/11/2007
yeye18, usuario preguntando en Visual FoxPro
Usuario
gracias... :D me sirvió de mucho, si que eres un TODOEXPERTO :D .
MUCHAS GRACIAS.....
Enlaces patrocinados