diff options
Diffstat (limited to '2063/CH10/EX10.3/10_3.sce')
| -rwxr-xr-x | 2063/CH10/EX10.3/10_3.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/2063/CH10/EX10.3/10_3.sce b/2063/CH10/EX10.3/10_3.sce new file mode 100755 index 000000000..8d9a7bf23 --- /dev/null +++ b/2063/CH10/EX10.3/10_3.sce @@ -0,0 +1,13 @@ +clc
+clear
+//Input data
+T1=300;//The maximum temperature at which carnot cycle operates in K
+T2=250;//The minimum temperature at which carnot cycle operates in K
+
+//Calculations
+COPr=T2/(T1-T2);//COP of the refrigerating machine
+COPh=T1/(T1-T2)//COP of heat pump
+n=((T1-T2)/T1)*100;//COP or efficiency of the heat engine in percentage
+
+//Output data
+printf('(a)COP of the machine when it is operated as a refrigerating machine is %3.2f\n (b)COP when it is operated as heat pump is %3.2f\n (c)COP or efficiency of the Heat engine is %3.2f percent',COPr,COPh,n)
|