diff options
Diffstat (limited to '2132/CH6/EX6.18/Example6_18.sce')
-rwxr-xr-x | 2132/CH6/EX6.18/Example6_18.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/2132/CH6/EX6.18/Example6_18.sce b/2132/CH6/EX6.18/Example6_18.sce new file mode 100755 index 000000000..71c9b9383 --- /dev/null +++ b/2132/CH6/EX6.18/Example6_18.sce @@ -0,0 +1,14 @@ +//Example 6.18
+clc;
+clear;
+close;
+format('v',4);
+//Given data :
+g=9.81;//constant
+A=3.2;//m^2
+a=10*10^-4;//m^2
+H1=5;//meter
+H2=2.5;//meter
+Cd=0.6;//Coefficient of discharge
+t=2*A*(sqrt(H1)-sqrt(H2))/Cd/a/sqrt(2*g);//sec
+disp("Time taken is "+string(floor(t/60))+" minute "+string((t/60-floor(t/60))*60)+" seconds.");
|