1 files changed, 15 insertions, 0 deletions
diff --git a/1466/CH7/EX7.8/7_8.sce b/1466/CH7/EX7.8/7_8.sce
new file mode 100755
index 000000000..3e9b93c04
--- /dev/null
+++ b/1466/CH7/EX7.8/7_8.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+A1= 400 //ft^2
+f= 0.01
+l= 1000 //m
+d= 0.25 //ft
+H1= 7.22 //ft
+H2= 1.66 //ft
+A2= 225 //ft^2
+a= 0.0491 //ft^2
+g= 32.2 //ft^2
+//CALCULATIONS
+T= 2*A1*sqrt(1+(4*f*l/d))*(sqrt(H1)-sqrt(H2))/(a*60*sqrt(2*g)*(1+(A1/A2)))
+//RESULTS
+printf ('Time taken to reduce height = %.f min',T)