Scheme: Descuento de venta por semana

Enunciado: Un almacén de cadena tiene como política etiquetar los productos con el precio  y la fecha en que son puestos en venta. Si han pasado tres semanas y el producto no ha sido vendido entonces el producto debe pasar a la sesión de descuentos. Si el producto tiene 3 semanas el descuento es del 25 %, si han pasado 4 semanas el producto tiene el 50% de descuento; a la quinta semana el producto tiene el 75% de descuento (es el máximo descuento que se puede hacer).  

objetivo: Desarrolle un programa en scheme llamado nuevo-precio, el cual toma como entrada el precio inicial del producto y el número de semanas transcurrido desde que se puso el producto a la venta. El programa debe retornar el nuevo precio del producto. 


Pantallazo del código 

codigo-scheme-descuento-venta



; ==========================================================
;plantilla
(define (nuevo-precio precioIN semanas)
  (cond
    [(= semanas 3) (-  precioIN (/ (* precioIN 25) 100))]
    [(= semanas 4) (- precioIN  (/ (* precioIN 50) 100) )]
    [(>= semanas 5) (- precioIN (/ (* precioIN 75) 100) )]
    [else "los datos son incorrectos"]
    )
  )
;prueba
(nuevo-precio 5000 4)
; ==========================================================
Compartir en facebook twitter Google tumblr pinterest

Entradas similares

0 Comentarios