blob: 1b14d0f5e79522eb518ef03ecc49fb38b46a4c52 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
//Part A Chapter 6 Example 3
clc;
clear;
close;
R=8.314/32;//kJ/kgK
p1=125;//kPa
p2=375;//kPa
T1=27+273;//K
T2=T1;//K
delta_S=-R*log(p2/p1);//kJ/K;//kJ/kgK
disp("Change in entropy = "+string(delta_S)+" kJ/K");
|
