2159/CH1/EX1.8/8.sce


1
2
3
4
5
6
7
8
9
10
11
12

//problem 1.8
s1=0.8
s2=0.7
h1=1.5
h2=0.3
h3=0.7
s3=13.6
hd=h2*s2+h3*s3-h1*s1
w=9810
pd=hd*w
disp(hd, "diffrence in pressure in term of height of water(m)")
disp(pd, "difference in pressure (N/m2)")