4 lines
113 B
Common Lisp
4 lines
113 B
Common Lisp
(defun mean (&rest sequence)
|
|
(if (null sequence)
|
|
nil
|
|
(/ (reduce #'+ sequence) (length sequence))))
|