summaryrefslogtreecommitdiff
path: root/2144/CH3/EX3.14/ex3_14.sce
blob: de88bed13197cb5d239613c7c087c18958c84b84 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Exa 3.14
clc;
clear;
close;
// Given data
P1 = 30;// in bar
P1= P1*10^5;// in N/m^2
V1 = 0.85;// in m^3
V2 = 4.25;// in m^3
W = P1 *V1 * log(V2/V1);// in Joules
W = W * 10^-3;// in kJ
T = 400;// in K
del_U = W/T;// in kJ/K
disp(del_U,"Change in entropy in kJ/K is");