summaryrefslogtreecommitdiff
path: root/2021/CH19/EX19.9/EX19_9.sce
blob: 8ba1719c340e020759fab74c156d8e3490bd911f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Finding of Manometric head
//Given
D1=0.4;
B1=0.025;
Q=0.06;
N=1000;
a=30;
g=9.81;
Emano=0.8;
//To Find
u=(%pi*D1*N)/60;
Vf=Q/(%pi*D1*B1);
Vw1=(-Vf*tan(%pi/6)+u);
H=(Vw1*u)/g;
Hm=(Emano*u*Vw1)/g;
Hm1=2*Hm;
disp("Head Developed ="+string(Hm1)+" meter");