summaryrefslogtreecommitdiff
path: root/551/CH4/EX4.17/17.sce
blob: 4b53e4a700fc03faf538ba46b8c8937a8d38d6c5 (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
V1=0.25; //m^3
p1=500; //kPa
p2=100; //kPa
V2=V1*(p1/p2)^(1/1.25)
n=1.25
dU=3.64*(p2*V2 - p1*V1)


disp("(i) If the expansion is quasi-static")
W=(p1*V1-p2*V2)/(n-1);
Q=dU+W
disp("Heat transfered=")
disp(Q)
disp("kJ")


disp("(ii) In another process")
Q=32; //kJ
W=Q-dU;
disp("Work done=")
disp(W)
disp("kJ")


disp("(iii)The difference")
disp("(iii) The work in (ii) is not equal to ∫ p dV since the process is not quasi-static.")