thru 100 do dispterms(sum(i*i,i,1,?read()*.03314+.61));