**TI92P*csp2003Rf2­¥ZS(n) Func Local c,t 0c For t,1,n c+rand()^2+rand()^2c EndFor c/n EndFuncIäåÜ›