diff options
Diffstat (limited to '3825/CH7/EX7.7/EX7_7.sce')
| -rw-r--r-- | 3825/CH7/EX7.7/EX7_7.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3825/CH7/EX7.7/EX7_7.sce b/3825/CH7/EX7.7/EX7_7.sce new file mode 100644 index 000000000..bcaf30a18 --- /dev/null +++ b/3825/CH7/EX7.7/EX7_7.sce @@ -0,0 +1,13 @@ +clc
+Q1=50
+Q2=Q1
+T1=480
+T2=300
+mprintf("integral(dQ/T)=%fkJ/min K\n",(Q1/T1)-(Q2/T2))
+Eta=1-(T2/T1)
+mprintf("Eta=%f\n",Eta)
+W=Eta*Q1
+mprintf("Eta*Q1=%fkJ/min\n",W)
+Q2=Q1-W
+mprintf("Q2=%fkJ/min",Q2)
+
|