summaryrefslogtreecommitdiff
path: root/1466/CH7/EX7.11/7_11.sce
diff options
context:
space:
mode:
Diffstat (limited to '1466/CH7/EX7.11/7_11.sce')
-rwxr-xr-x1466/CH7/EX7.11/7_11.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/1466/CH7/EX7.11/7_11.sce b/1466/CH7/EX7.11/7_11.sce
new file mode 100755
index 000000000..5e6e7cf43
--- /dev/null
+++ b/1466/CH7/EX7.11/7_11.sce
@@ -0,0 +1,21 @@
+
+
+
+clc
+//initialisation of variables
+clear
+D=0.25
+f=0.01
+l=600//ft
+H=100//ft
+g=32.2//ft/sec^2
+pi=22/7
+//CALCULATIONS
+k=sqrt(8*f*l/D)
+d=sqrt(D*D/k)
+v=sqrt(H*2*g*D/(3*f*4*l))
+v1=v*k
+hp=(62.4*pi*d*d*v1^3)/(4*2*g*550)
+//RESULTS
+printf (' Diameter= %.3f in ',d*12-0.002)
+printf ('\n Horsepower= %.3f ',hp-0.018)