blob: 1e78d944e06a966c41cff68fcb5249e91c6ff171 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
//Chapter 13 Thermodynamics Entropy and Free Energy
clc;
clear;
//Initialisation of Variables
F= -51180 //cal
T= 25 //C
R= 1.99 //cal/mole K
//CALCULATIONS
K= 10**(-F/(R*(273+T)*2.303))
//RESULTS
mprintf("Equilibrium constant = %.2e",K)
|
