diff options
Diffstat (limited to '3876/CH13/EX13.15/Ex13_15.sce')
| -rw-r--r-- | 3876/CH13/EX13.15/Ex13_15.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/3876/CH13/EX13.15/Ex13_15.sce b/3876/CH13/EX13.15/Ex13_15.sce new file mode 100644 index 000000000..3483c47fb --- /dev/null +++ b/3876/CH13/EX13.15/Ex13_15.sce @@ -0,0 +1,20 @@ +//Chapter 13 Thermodynamics Entropy and Free Energy + +clc; +clear; + +//Initialisation of Variables +T= 25 //C +H= -94.05 //kcal +H1= -26.42 //kcal +S= 51.06 //cal per degree +S1= -47.3 //cal per degree +S2= -24.5 //cal per degree + +//CALCULATIONS +dH= (H-H1)*1000 +dS= S+S1+S2 +F= dH-(273+T)*dS + +//RESULTS +mprintf("Value of F = %.0f cal",F) |