Quitar un elemento de una lista [Scheme / DrRacket]

Enunciado: crea un programa el cual quite de una lista de juguetes aquellos que superen el precio limite dado por el usuario.

en esta oportunidad les traigo el primer ejemplo de manejo de listas en scheme y como quitar un elemento de una lista.

 manejo de listas en scheme como quitar un elemento de una lista
toma de pantalla DrRacket - como quitar un elemento de una lista


; ===========================================================================
(define-struct Toy (nom pre))
;Toy representa un juguete
;nom = nombre tipo symbol
;pre = precio tipo number

(define juguetes (list (make-Toy 'car 30)
                       (make-Toy 'dol 30)
                       (make-Toy 'goku 40)
                       (make-Toy 'barbie 50)
                       (make-Toy 'mini-kira 200)))

(define (quitar lis lim)
  (cond
    [(empty? lis) empty]
    [(> (Toy-pre (car lis)) lim)(quitar (cdr lis) lim)]
    [else (cons (car lis) (quitar (cdr lis) lim))]
    ))

;Prueba: 
(quitar juguetes 50)
; ===========================================================================
Compartir en facebook twitter Google tumblr pinterest

Entradas similares

0 Comentarios