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