summaryrefslogtreecommitdiff
path: root/2021/CH7/EX7.16/Ex7_16.sce
blob: b3e1e4c0c17490a352787d3815a9889f43536f83 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Finding of Maximum rise of water level,velocity,Time of occurance
//Given
d=4;
d1=1;
l=150;
q=2;
g=9.81;
//To Find
a1=(%pi/4)*d^2;
a2=(%pi/4)*d1^2;
v=q/a2;
a=(l*a2)/(g*a1);
b=sqrt(a);
h=v*b;
c=(l*a1)/(g*a2);
d=sqrt(c);
t=(%pi/2)*d;
v1=v*(a2/a1);
disp("Maximum rise of water ="+string(h)+" meter");
disp("Time taken ="+string(t)+" seconds");
disp("Maximum Velocity ="+string(v1)+" m/sec");