yr 1 t1 q2 4 rem soltn to ex2 - mn & std deviation - j.h.stacey keynes 6 input n 20 print n;"nos in disc" 25 if n < 1 then 85 40 let b,c = 0 50 let m = n 55 input x 60 let b = b+x 65 let c = c+x^2 70 let m = m-1 75 if m > 0 then 55 80 print "mean is";b/n;"std dev is ";sqr((c-n*(b/n)^2)/(n-1)) 85 end