blob: 5a54bf7c989b9a3aabc12a9c5bf2d169efdab903 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
clc
V1=0.15; //m^3
V2=0.05; //m^3
Q=-45; //kJ
p1=(5/V1+1.5)*10^5; //N/m^2
p2=(5/V2+1.5)*10^5; //N/m^2
W=integrate('(5/V+1.5)*10^2', 'V', V1, V2);
disp("(i)Change in internal energy = ")
dU=Q-W;
disp("dU=")
disp(dU)
disp("kJ")
disp("(ii) Change in enthalpy")
dH=(dU*10^3+(p2*V2-p1*V1))/10^3;
disp("dH=")
disp(dH)
disp("kJ")
|