9 lines
132 B
Text
9 lines
132 B
Text
|
100 PRINT RMS(10)
|
||
|
|
110 DEF RMS(N)
|
||
|
|
120 LET R=0
|
||
|
|
130 FOR X=1 TO N
|
||
|
|
140 LET R=R+X^2
|
||
|
|
150 NEXT
|
||
|
|
160 LET RMS=SQR(R/N)
|
||
|
|
170 END DEF
|