Averages/Root mean square: Difference between revisions
no edit summary
No edit summary |
No edit summary |
||
Line 1,627:
{{out}}
<pre>
The root mean square is: 6.204837
</pre>
=={{header|S-lang}}==
Line 1,659 ⟶ 1,661:
end;
end;</lang>
=={{header|S-BASIC}}==
<lang basic>
var n, sqsum, sqmean, rms = real
sqsum = 0
for n = 1 to 10 do
sqsum = sqsum + (n * n)
next n
sqmean = sqsum / n
rms = sqr(sqmean)
print "RMS of numbers from 1 to 10 = ";rms
end
</lang>
{{out}}
<pre>
RMS of numbers from 1 to 10 = 6.20484
</pre>
=={{header|Scala}}==
| |||