RosettaCodeData/Task/Averages-Arithmetic-mean/Lucid/averages-arithmetic-mean.lucid
2023-07-01 13:44:08 -04:00

6 lines
97 B
Text

avg(x)
where
sum = first(x) fby sum + next(x);
n = 1 fby n + 1;
avg = sum / n;
end