summaryrefslogtreecommitdiff
path: root/2021/CH7/EX7.6/EX7_6.sce
blob: 7b091d6b9b215fcc5e4d374da33b7b262d5ad068 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Finding of Head
//Giiven
f=0.032;
l=400;
d=0.3;
q=0.3;
g=9.81;
//TO find
A=(%pi/4)*d^2
V=q/A;
v1=(V^2);
x=1.5+(f*l/d);
y=v1/(2*g);
H=x*y;
disp("Difference in water level ="+string(H)+" meter")