4 lines
76 B
Scheme
4 lines
76 B
Scheme
(define (mean l)
|
|
(if (null? l)
|
|
0
|
|
(/ (apply + l) (length l))))
|