diff options
Diffstat (limited to '3876/CH11/EX11.1/Ex11_1.sce')
-rw-r--r-- | 3876/CH11/EX11.1/Ex11_1.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/3876/CH11/EX11.1/Ex11_1.sce b/3876/CH11/EX11.1/Ex11_1.sce new file mode 100644 index 000000000..afe3e664b --- /dev/null +++ b/3876/CH11/EX11.1/Ex11_1.sce @@ -0,0 +1,24 @@ +//Chapter 11 Thermodynamics Some Basic Concepts + +clc; +clear; + +//Initialisation of Variables +T= 25 //C +T1= 75 //C +k= 6.45 //cal per mole per degree +k1= 1.41*10**-3 //cal per mole per degree k^-1 +k2= -8.1*10**-8 //cal per mole per degree k^-2 +m= 14 //gms +M= 28 //gms + +//CALCULATIONS +Cp= k+k1*(273+T)+k2*(273+T)**2 +Cp1= k+k1*(273+T1)+k2*(273+T1)**2 +cp= (Cp+Cp1)/2 +H= (m/M)*cp*(T1-T) +H1= (m/M)*(k*(T1-T)+(k1/2)*((273+T1)**2-(273+T)**2)+(k2/3)*((273+T1)**3-(273+T)**3)) + +//RESULTS +mprintf("Heat required= %.1f cal",H) +mprintf("\nValue of dH= %.1f cal",H1) |