Problem C.
相変わらず問題の意味は良く分からないですがとりあえずxorすればいいのかなってことで解きました
xorでまとめただけです
(defun compute (lst)
(if (zerop (reduce #'logxor lst))
(reduce #'+ (cdr (sort lst #'<)))
"NO"))
(dotimes (i (read))
(let ((r nil))
(dotimes (j (read))
(setf r (cons (read) r)))
(format t "Case #~A: ~A~%" (1+ i) (compute (nreverse r)))))
