diff options
Diffstat (limited to '3843/CH5/EX5.4/Ex5_4.sce')
-rw-r--r-- | 3843/CH5/EX5.4/Ex5_4.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/3843/CH5/EX5.4/Ex5_4.sce b/3843/CH5/EX5.4/Ex5_4.sce new file mode 100644 index 000000000..1ce467dbc --- /dev/null +++ b/3843/CH5/EX5.4/Ex5_4.sce @@ -0,0 +1,11 @@ +// Example 5_4
+clc;funcprot(0);
+// Given data
+T_H=200+273;// K
+T_L=20+273;// K
+W=15;// kW
+
+// Calculation
+Q_H=W/(1-(T_L/T_H));//kW
+Q_L=Q_H-W;// kW
+printf("\nThe heat transfer from the high temperature reservoir,Q_H=%2.2f kW \nThe heat transfer from the high temperature reservoir,Q_L=%2.2f kW",Q_H,Q_L);
|