RosettaCodeData/Task/Averages-Arithmetic-mean/EMal/averages-arithmetic-mean.emal
2024-10-16 18:07:41 -07:00

6 lines
221 B
Text

fun mean ← <some real values|when(values.length æ 0,
0.0,
values.fold(0.0, <real x, real y|x + y) / values.length)
^|the mean is calculated by folding the list|^
writeLine(mean())
writeLine(mean(3, 1, 4, 1, 5, 9))