Enunciado: Una compañía dedicada al alquiler de motos cobra un valor fijo de $100.000 para los primeros 100 Km de recorrido. Para más de 100 Km y hasta 500 Km, cobra un valor adicional de $3000 por cada kilómetro en exceso sobre 100 KM. Para más de 500 Km. cobra un monto adicional de $ 1000 por cada kilómetro en exceso sobre 500 KM. Los precios NO incluyen el 16% del IVA. Diseñe un algoritmo que determine el valor a pagar por el alquiler de la moto con el IVA.
; ==========================================================
(define (alquiler km)
(cond
[(<= km 100) (+ (/ (* 16 100000) 100) 100000)]
[ (and (> km 100) (<= km 500)) (+ (* (- km 100 ) 3000) (/ (* 16 (+ (* (- km 100 ) 3000) 100000)) 100) 100000)]
[ (> km 500) (+ (* (- km 500) 1000) (/ (* 16 (+ (* (- km 100 ) 3000) 100000)) 100) 100000)]
[else "dato no valido"]))
;prueba
(alquiler 90)
(alquiler 120)
(alquiler 520)
; ==========================================================
