diff options
Diffstat (limited to '2837/CH19/EX19.13')
-rwxr-xr-x | 2837/CH19/EX19.13/Ex19_13.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/2837/CH19/EX19.13/Ex19_13.sce b/2837/CH19/EX19.13/Ex19_13.sce new file mode 100755 index 000000000..de3027d69 --- /dev/null +++ b/2837/CH19/EX19.13/Ex19_13.sce @@ -0,0 +1,16 @@ +clc
+clear
+//Initalization of variables
+n=1.4
+t1=540 //R
+tmax=1500 //F
+pr=5
+cp=0.24
+t3=1558 //R
+net=125.8 //Btu/lb
+//calculations
+Q=cp*(tmax+460-t3)
+Qt=2*Q
+eta=net/Qt*100
+//results
+printf("Thermal efficiency = %.1f percent",eta)
|