blob: 418a1d84f82c897c766113277798525846179fd9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
clc
T2=235; //K
P=1.3; //kW
disp("(i) C.O.P. of Carnot refrigerator =")
COP=14000/P/60/60;
disp(COP)
disp("(ii) Higher temperature of the cycle =")
T1=T2/COP + T2;
t1=T1-273;
disp(t1)
disp("0C")
disp("(iii) Heat delivered as heat pump")
Qabs=14000/60; //Heat absorbed
W=P*60;
Q=Qabs+W;
disp("Q=")
disp(Q)
disp("kJ/min")
COP=Q/W;
disp("COP of heat pump =")
disp(COP)
|