Sharp PC-1500 Applications Manual page 67
Hide thumbs
Also See for PC-1500:
- Technical reference manual (182 pages) ,
- Instruction manual (169 pages) ,
- Service manual (37 pages)
Advertisement
All and
more about Sharp
PC-1500
at http://www.PC-1500.info
PROGRAM
T
EST OF
MEAN
VAL UE
DI
FFERENCE
PROGRAM
NO.
5
T
I
T
LE
AND VAR IANCE
RATIO
PS-
B-7
[ Program
List
I
[
Memory
Contents
]
10:
..
A
..
:
CLEAR
:
500:N=0:T=0:S=0
I
NPUT
"
N
l=
'';M,
510:
JNPUT
"X~"iX;
A
"
N2=''
i
N
GOTO
530
B
20:
I
NPUT
"MEAN
l
~
520:GO
TO
550
";Y, "MEAN
2-".
530:N=N.o.J:T=T +)(
c
-
'
x
540:S=S•X*X:GOTO
5
D
30: INPUT
"STO.
OE:V
10
I=" ;R,
"STD. 0
550:X=T/N:S=S-N*X*
E
EV.
2=";S
x
F
40:R=R*R*<M-l>
560:CLS
:
LPRlNT
"M
50
:S=S*S*< N-t):
EAN=";
X
G
GO
TO
90
570:LPRJ
NT
"STD.DE
60: ..
B"
:GOSUB 500
V.
=",
.I
(
$/
(
N-
l
>
H
70
:M=N:
R=5:Y=X:
)
I
GO
SUB
500
580:
LF l:
RETURN
80:
L'=M+N
J
90:
T=<Y-
X> *<<M*N*
K
<L- 2>/<L:i:<R•S>
))
L
M
+
N
100:LPR!NT
"'T=
"i
T:
STA
TUS
I
LPR!NT
"PHJ.:";
6 11
M
i.J'o. of data for
L-
2
population
1
ll0:ENO
No.
of
data
for
120:
..
X
.. :
INPU
T
"N
l
.::.
N
";M,
"N2
~
"
;H
population
2
I
30:
INPUT
"STO
.
OEU
.
J=
";
R,
11
ST
O.O
0
EU.
2=''
j
s
p
140: R=R*R:
S=S*S:
GOTO
180
a
150: "Z":
605UB
500
Standard
deviation
160:M=N:R=S:GOSU8
R
500
of
population
1
l/0:R=R/(M-J):S=S/
Standard
<N-
l>
s
deviation
I
80
:
J
F S>RLET
Z:n:
of
population
2
M
=N
:N=Z:
Z=S:S=
R:R
=Z
T
Test
value
J90:LPR
JN
T
''
F=
11
;
R/
u
s
200:LPRJNT
.. PHI
I="
v
;M-
1
w
210:LPRJNT
'"PH12="'
; N-1
x
Mean
value
o
f
220:ENO
population
2
y
Mean
value
o
f
population 1
z
v
Do
not
sale
this PDF !!!
-
61
Advertisement
