1 files changed, 15 insertions, 0 deletions
diff --git a/1466/CH14/EX14.5/14_5.sce b/1466/CH14/EX14.5/14_5.sce
new file mode 100755
index 000000000..716afed46
--- /dev/null
+++ b/1466/CH14/EX14.5/14_5.sce
@@ -0,0 +1,15 @@
+
+clc
+//initialisation of variables
+p1=120//lb/in^2
+T=288//k
+R=96//ft-lb
+g=1.404
+g1=32.2//ft/sec^2
+n=0.528
+//CALCULATIONS
+v1=(R*T)/(144*p1)
+k=g/(g-1)
+w=(%pi*sqrt(2*g1*k*p1*v1*144*(n^(2/g))*(1-(n)^(1/k))))/(4*144*v1)
+//RESULTS
+printf (' weight of maximum discharge in pounds per second= %.2f lb/sec',w)