diff options
Diffstat (limited to '1709/CH12/EX12.10')
| -rwxr-xr-x | 1709/CH12/EX12.10/12_10.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1709/CH12/EX12.10/12_10.sce b/1709/CH12/EX12.10/12_10.sce new file mode 100755 index 000000000..2a2b538e2 --- /dev/null +++ b/1709/CH12/EX12.10/12_10.sce @@ -0,0 +1,16 @@ +clc
+//Initialization of variables
+e=0.83
+//calculations
+T1=530 //R
+T2d=838 //R
+T6d=T2d
+T3=1960 //R
+T4d=1375 //R
+T5d=T4d
+T5=e*(T5d-T2d) +T2d
+W=0.24*((T3-T4d)- (T2d-T1))
+Q=0.24*(T3-T5)
+eta=W/Q
+//results
+printf("Thermal efficiency = %d percent",eta*100+1)
|