DIM x(100) FOR i = 1 TO 100 INPUT x(i) IF x(i) = 0 THEN ct = i - 1 EXIT FOR END IF NEXT sum = 0 FOR i = 1 TO ct sum = sum + x(i) NEXT average = sum / ct FOR i = 1 TO ct v = v + (x(i) - average) ^ 2 NEXT v = v / ct sd = SQR(v) PRINT average, v, sd