Descuentos en un sorteo - Scheme / Dr Racket

Enunciado: es una tienda de descuentos se efectúa una compra en la cual  se hace un descuento sobre el valor de la compra total según el color de la volita  que el cliente saque al pagar en caja. si la volita es de color blanco no se le hará  descuento alguno, si es verde se le hará un 10% de descuento si es amarilla un 25%, si es azul un 50% y si es roja un 100% determinar la cantidad final que el cliente deberá pagar por su compra.  se sabe que solo hay volitas de los colores mencionados.


ejercicio sorteo y descuentos en scheme
toma de pantalla de DrRacket sorteo



; ===========================================================================
(define (descuento valor color)
  (cond 
    [(symbol=? color 'blanco)  valor]
    [(symbol=? color 'verde) (- valor (/ (* 10 valor)100))]
    [(symbol=? color 'amarilla) (- valor (/ (* 25 valor)100))]
    [(symbol=? color 'azul) (- valor (/ (* 50 valor)100))]
    [(symbol=? color 'roja) (- valor (/ (* 100 valor)100))]
    
    [else "datos incorrectos"]))

;prueba
(descuento 1000 'blanco)
(descuento 1000 'verde)
(descuento 1000 'amarilla)
(descuento 1000 'azul)
(descuento 1000 'roja)
; ===========================================================================



Compartir en facebook twitter Google tumblr pinterest

Entradas similares

0 Comentarios