diff options
Diffstat (limited to '1388/CH4/EX4.16')
| -rwxr-xr-x | 1388/CH4/EX4.16/4_16.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1388/CH4/EX4.16/4_16.sce b/1388/CH4/EX4.16/4_16.sce new file mode 100755 index 000000000..17ecbd5f5 --- /dev/null +++ b/1388/CH4/EX4.16/4_16.sce @@ -0,0 +1,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)
|