Anonymous user
Averages/Root mean square: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 274:
<lang haskell>main = print $ mean 2 [1 .. 10]</lang>
=={{header|HicEst}}==
<lang HicEst>sum = 0
DO i = 1, 10
sum = sum + i^2
ENDDO
WRITE(ClipBoard) "RMS(1..10) = ", (sum/10)^0.5 </lang>
RMS(1..10) = 6.204836823
== Icon and Unicon ==
| |||