P0 10 PRINT "STATI-0":IF L$="" THEN 30 11 PRINT "COMMENT ?":INPUT "KEY IN Y OR N ",L$ 12 IF L$="N" THEN 30 20 PRINT "X:DATA" 21 PRINT "Q:SUM OF SQ-X" 22 PRINT "S:SUM OF X" 23 PRINT "N:NO. OF DATA" 24 PRINT "A:AVERAGE" 25 PRINT "D:SD(N)" 26 PRINT "E:SD(N-1)" 30 INPUT "KEY IN X ",X:N=N+1:S=S+X:Q=Q+X*X:GOTO 30 P1 10 PRINT "Q=";Q:GOTO 10 P2 10 PRINT "S=";S:GOTO 10 P3 10 PRINT "N=";N:GOTO 10 P4 10 A=S/N 20 PRINT "A=";A:GOTO 20 P5 10 D=SQR ((Q-S*S/N)/N) 20 PRINT "SD(N):D=";D:GOTO 20 P6 10 E=SQR ((Q-S*S/N)/(N-1)) 20 PRINT "SD(N-1):E=";E:GOTO 20 P7 10 INPUT "H= ",H:Y=(H-50)*E/10+A:PRINT "X=";Y:GOTO 10 P8 10 A=S/N:E=SQR ((Q-S*S/N)/(N-1)) 20 INPUT "KEY IN X ",X:H=10*(X-A)/E+50:PRINT "D. VALUE =";H 30 PRINT H;GOTO 20 P9 10 Q=0:S=0:N=0:L$="":GOTO#0