summaryrefslogtreecommitdiff
path: root/1388/CH4/EX4.16/4_16.sce
blob: 17ecbd5f5c1f9b358e4cef4a411dd7f38534255d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc
//initialisation of variables
Cp= 18 //cal deg^-1
T= 0 //C
T1= -5 //C
H2= -1440 //cal
Cp1= 9 //cal deg^-1
H= 0
//CALCULATIONS
T2= (-Cp*(T-T1)-H2+Cp1*(273.16+T))/Cp1
S= Cp*log((273.16+T)/(273.16+T1))-(Cp*(T-T1)/(T+273.16))
//RESULTS
printf (' CHange in entropy= %.3f cal deg^-1',S+0.001)