diff options
Diffstat (limited to '2132/CH7/EX7.17/Example7_17.sce')
-rwxr-xr-x | 2132/CH7/EX7.17/Example7_17.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/2132/CH7/EX7.17/Example7_17.sce b/2132/CH7/EX7.17/Example7_17.sce new file mode 100755 index 000000000..13f72df9a --- /dev/null +++ b/2132/CH7/EX7.17/Example7_17.sce @@ -0,0 +1,22 @@ +////Example 7.17
+clc;
+clear;
+close;
+format('v',9);
+//Given data :
+g=9.81;//gravity constant
+Cv=0.97;//coeffiecient of velocity
+Cc=0.95;//coeffiecient
+Dn=50/1000;//meter(Nozzle diameter)
+D=100/1000;//meter(Pipe diameter)
+p=6.867;//N/cm^2(Pressure at the base of nozzle)
+Hb=p*10^4/(g*1000)//meter(Head at the base of nozzle)
+v=Cv*sqrt(2*g*Hb);//m/s(velocty of jet)
+disp(v,"Velocity in the jet(m/s)");
+A=%pi/4*Dn^2;//m^2(Cross sction of jet)
+Q=Cc*A*v;//m^3/sec(Discharge)
+Q=Q*1000;//litres/sec
+disp(Q,"Rate of discharge(litres/second)");
+E=g*1000*Q/1000*Hb/1000;//kW(Energy transmitted)
+disp(E,"Energy per second n the jet(kW)");
+//Answer in the book is not accurate.
|