summaryrefslogtreecommitdiff
path: root/3718/CH3/EX3.7/Ex3_7.sce
blob: 6d5415a06bcee50655438dfca9292a474a0a1c01 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//Chapter 3: Thermodynamic and Chemical Equilibrium
//Problem: 7
clc;

//Declaration of Constant
d_h_vap = 2.0723         // kJ per g
Tb = 373                     // K

// Solution
d_h_vap = d_h_vap * 18            // kJ per mol
d_s = d_h_vap / Tb
d_g = d_h_vap - Tb * d_s
d_s = d_s * 1000

mprintf("The Entropy change is: %.1f J / mol / K\n",d_s)
mprintf(" The Free Energy change is:%d kJ/mol", d_g)