1 files changed, 23 insertions, 0 deletions
diff --git a/2837/CH19/EX19.5/Ex19_5.sce b/2837/CH19/EX19.5/Ex19_5.sce
new file mode 100755
index 000000000..b775ca94d
--- /dev/null
+++ b/2837/CH19/EX19.5/Ex19_5.sce
@@ -0,0 +1,23 @@
+clc
+clear
+//Initalization of variables
+pr=5
+p1=14 //psia
+pd=3 //psi
+pen=70 //psia
+tin=1960  //R
+n=1.4
+cp=0.24
+Qs=265
+ef=0.95
+//calculations
+p2=p1*pr
+pe=pen-pd
+prt=pe/p1
+tex=tin/prt^((n-1)/n)
+twork=cp*(tin-tex)
+net=twork-75.9
+Qs2=Qs/ef
+eff=net/Qs2 *100
+//results
+printf("Thermal efficiency = %.1f percent",eff)