**TI86** Ð ÁTMNTESTÁ¿ClLCDÖDisp "TEST MEAN"ÖInput MÖDisp "SAMPLE SIZE"ÖInput NÖDisp "XBAR"ÖInput XÖDisp "SAMPLE DEV."ÖInput SÖDisp "LEVEL OF SIG."ÖInput AÖ(X-M)/(S/(N))ZÖtcdf(0,Z,N-1)BÖB+.5LÖ.5-BRÖIf A>RÖThenÖDisp "REJECT MEAN  M"ÖElseÖDisp "ACCEPT MEAN  M"ÖEndÖIf A>LÖThenÖDisp "REJECT MEAN  M"ÖElseÖDisp "ACCEPT MEAN  M"ÖEndÖIf (A/2>R) or (A/2>L)ÖThenÖDisp "REJECT MEAN = M"ÖElseÖDisp "ACCEPT MEAN = M"ÖEndÖDisp ZÖDisp "TAIL VALUES",{round(L,4),round(R,4)}””