1 files changed, 14 insertions, 0 deletions
diff --git a/1466/CH7/EX7.4/7_4.sce b/1466/CH7/EX7.4/7_4.sce
new file mode 100755
index 000000000..553c354d4
--- /dev/null
+++ b/1466/CH7/EX7.4/7_4.sce
@@ -0,0 +1,14 @@
+
+clc
+//initialisation of variables
+g= 32.2 //ft/sec^2
+f=0.01
+l= 1500 //ft
+d= 6 //in
+h= 96 //ft
+//CALCULATIONS
+v= sqrt((h*2*g)/(1+(4*f*l/(d/12))))
+D= v*%pi*(d/12)^2/4
+//RESULTS
+printf (' discharge through the pipe = %.2f ft^3/sec',D)
+