blob: c1fca5842102de6e862adf768855eae881dd11d2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//Chapter 13 Thermodynamics Entropy and Free Energy
clc;
clear;
//Initialisation of Variables
m= 14 //gms
M= 28 //gms
S= 6.94 //cal per mole
T= 127 //C
T1= 27 //C
S1= 4.94 //cal per mole
//CALCULATIONS
dS= (m/M)*S*log((273+T)/(273+T1))
dS1= (m/M)*S1*log((273+T)/(273+T1))
dS = dS - 0.01
//RESULTS
mprintf("Entropy change = %.2f E.U",dS)
mprintf("\nEntropy change = %.2f E.U",dS1)
|