diff options
Diffstat (limited to '1364/CH13/EX13.6.1/13_6_1.sce')
| -rwxr-xr-x | 1364/CH13/EX13.6.1/13_6_1.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1364/CH13/EX13.6.1/13_6_1.sce b/1364/CH13/EX13.6.1/13_6_1.sce new file mode 100755 index 000000000..9c601351c --- /dev/null +++ b/1364/CH13/EX13.6.1/13_6_1.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+d= 0.94
+b= 20 //ft
+h= 5 //ft
+w= 40 //ft
+g= 32.2 //ft/sec^2
+//CALCULATIONS
+Q= 0.309*d*b*h^1.5
+u=Q/(h*w)
+h1= h+(u^2/(2*g))
+Q1= 0.309*d*b*h1^1.5
+//RESULTS
+printf (' Rate of flow= %.f ft^3/sec',Q1)
|