diff options
Diffstat (limited to '3814/CH2/EX2.10/Ex2_10.sce')
| -rw-r--r-- | 3814/CH2/EX2.10/Ex2_10.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3814/CH2/EX2.10/Ex2_10.sce b/3814/CH2/EX2.10/Ex2_10.sce new file mode 100644 index 000000000..2ba377a6e --- /dev/null +++ b/3814/CH2/EX2.10/Ex2_10.sce @@ -0,0 +1,14 @@ +// determine the flow rate from the nozzle and power required to drive the pump
+//ex 2.10 pgno.47
+clc
+v=8.31 // velocity at c
+a= (%pi*(75e3)^2)/4
+Q=a*v // flow rate
+mprintf('Q = %e /s',Q)
+g=9.8 // constant gamma
+zc=32 // elevation
+Hp= (v^2/(2*g))+zc // heat developed by pump
+mprintf(' \n Hp= %f m ',Hp)
+gammma=9800// constant gammma
+P=gammma*Q*Hp //power required
+mprintf('\n P= %e W',P)
|