mnozestvo - Fevruari (2015) - kaznena

Дефинирај функција mnozestvo која како аргумент прима листа, а враќа множество
добиено од влезната листа. Односно, како резултат се добива листа во која нема повторување на
елементите.


(defun mnozestvo (lista)
    (cond
        ((null lista) nil)
        (t (cons (car lista)(mnozestvo (remove (car lista)(cdr lista)))))
        )
    )

(print  (mnozestvo '(a b a d c b a c)))