summaryrefslogtreecommitdiff
path: root/149/CH35/EX35.5/ex5.sce
blob: f710de5a2bf6e595cb02ee2f207d1ac6c885d2ff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clear
clc
p1=0.3
p2=0.25
disp('q1=1-p1')
q1=1-p1
disp('q2=1-p2')
q2=1-p2
n1=1200
n2=900
disp('e=((p1*q1/n1)+(p2*q2/n2))^0.5 ')
e=((p1*q1/n1)+(p2*q2/n2))^0.5
z=(p1-p2)/e
disp('hence,it is likely that real difference will be hidden.')