**TI86** ” „ZDIFMNCI„‚ClLCDÖDisp "1 = LARGE, LARGE","2 = LARGE, FINITE","3 = FINITE, LARGE","4 = FINITE ,FINITE"ÖInput CÖClLCDÖIf C==3 or C==4ÖThenÖDisp "1ST POP. SIZE"ÖInput KÖElseÖ0KÖEndÖIf C==2 or C==4ÖThenÖDisp "2ND POP. SIZE"ÖInput LÖElseÖ0LÖEndÖDisp "X SAMPLE SIZE"ÖInput PÖDisp "XBAR"ÖInput XÖDisp "X SAMPLE DEV."ÖInput SÖDisp "Y SAMPLE SIZE"ÖInput QÖDisp "YBAR"ÖInput YÖDisp "Y SAMPLE DEV."ÖInput TÖDisp "CONF. LEVEL"ÖInput RÖIf K0ÖThenÖS*((K-P)/(K-1))SÖEndÖIf L0ÖThenÖT*((L-Q)/(L-1))TÖEndÖinvnm((R+1)/2,0,1)BÖB*(S^2/P+T^2/Q)EÖClLCDÖDisp "DIFF, ERROR"ÖDisp round(X-Y,4)ÖDisp round(E,4)ÖDisp "CONF. INTERVAL"ÖDisp {round(X-Y-E,4),round(X-Y+E,4)}ÔÑ