Averages/Arithmetic mean: Difference between revisions
Content added Content deleted
(→{{header|Common Lisp}}: Improved style of conditionals for clarity) |
m (→{{header|Common Lisp}}: Corrected indentation) |
||
| Line 855: | Line 855: | ||
<lang lisp>(defun mean (list) |
<lang lisp>(defun mean (list) |
||
(when list |
(when list |
||
(/ (loop for i in list sum i) |
(/ (loop for i in list sum i) |
||
(length list))))</lang> |
(length list))))</lang> |
||
=={{header|Crystal}}== |
=={{header|Crystal}}== |
||