15 lines
278 B
Text
15 lines
278 B
Text
/* NetRexx */
|
|
options replace format comments java crossref symbols nobinary
|
|
|
|
parse arg maxV .
|
|
if maxV = '' | maxV = '.' then maxV = 10
|
|
|
|
sum = 0
|
|
loop nr = 1 for maxV
|
|
sum = sum + nr ** 2
|
|
end nr
|
|
rmsD = Math.sqrt(sum / maxV)
|
|
|
|
say 'RMS of values from 1 to' maxV':' rmsD
|
|
|
|
return
|