blob: f4f2283311903ebd2f40a2493a86d499a4255e94 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
//Chapter 3: Thermodynamic and Chemical Equilibrium
//Problem: 14
clc;
//Declaration of Variables
V1 = 6 //in dm cube
V2 = 2 //in dm cube
T1 = 27 //in C
m = 5
// Solution
mprintf("T1*V1 ^ (gamma - 1) = T2 * V2 ^ (gamma - 1)\n")
T1 =T1 + 273 // K
T2 = T1 * (V1 / V2) ** (8.314 / 20.91)
mprintf(" The Final Temperature is %.1f K\n",T2)
q = 0 //For Adiabatic process
d_E = - m * 20.91 * (T2 - T1)
d_E = d_E / 1000
mprintf(" q =%d \n", q)
mprintf(" Change is Energy is %.2f kJ / mol\n",d_E)
W = - d_E
mprintf(" W = %.2f kJ /mol",d_E)
|