Averages/Root mean square: Difference between revisions
Content added Content deleted
m (→[[Averages/Root_mean_square#ALGOL 68]]: rm ABS OPerator) |
|||
Line 148: | Line 148: | ||
(rms (loop for i from 1 upto 10 collect i))</lang> |
(rms (loop for i from 1 upto 10 collect i))</lang> |
||
=={{header|D}}== |
|||
<lang d>import std.stdio, std.math, std.algorithm, std.range; |
|||
real rms(Td)(Td d) { |
|||
return sqrt(reduce!("a+b*b")(d) / cast(real)d.length); |
|||
} |
|||
void main() { |
|||
writefln("%.19f", rms(iota(1, 11))); |
|||
}</lang> |
|||
Output: |
|||
<pre> |
|||
6.2048368229954282979 |
|||
</pre> |
|||
=={{header|Erlang}}== |
=={{header|Erlang}}== |