Averages/Root mean square: Difference between revisions
Content added Content deleted
Line 18: | Line 18: | ||
<lang PL/I> |
<lang PL/I> |
||
declare A(10) fixed decimal static initial (1,2,3,4,5,6,7,8,9,10); |
declare A(10) fixed decimal static initial (1,2,3,4,5,6,7,8,9,10); |
||
n = hbound(A,1); |
|||
RMS = sqrt(sum(A**2)/n); |
|||
</lang> |
</lang> |
||