summaryrefslogtreecommitdiff
path: root/3718/CH3/EX3.14/Ex3_14.sce
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)