summaryrefslogtreecommitdiff
path: root/1388/CH6
diff options
context:
space:
mode:
Diffstat (limited to '1388/CH6')
-rwxr-xr-x1388/CH6/EX3.12/6_12.sce14
-rwxr-xr-x1388/CH6/EX6.1/6_1.sce14
-rwxr-xr-x1388/CH6/EX6.10/6_10.sce18
-rwxr-xr-x1388/CH6/EX6.11/6_11.sce14
-rwxr-xr-x1388/CH6/EX6.13/6_13.sce15
-rwxr-xr-x1388/CH6/EX6.15/6_15.sce10
-rwxr-xr-x1388/CH6/EX6.16/6_16.sce9
-rwxr-xr-x1388/CH6/EX6.17/6_17.sce7
-rwxr-xr-x1388/CH6/EX6.18/6_18.sce11
-rwxr-xr-x1388/CH6/EX6.19/6_19.sce11
-rwxr-xr-x1388/CH6/EX6.2/6_2.sce8
-rwxr-xr-x1388/CH6/EX6.3/6_3.sce8
-rwxr-xr-x1388/CH6/EX6.4/6_4.sce8
-rwxr-xr-x1388/CH6/EX6.5/6_5.sce9
-rwxr-xr-x1388/CH6/EX6.7/6_7.sce17
-rwxr-xr-x1388/CH6/EX6.8/6_8.sce14
-rwxr-xr-x1388/CH6/EX6.9/6_9.sce14
17 files changed, 201 insertions, 0 deletions
diff --git a/1388/CH6/EX3.12/6_12.sce b/1388/CH6/EX3.12/6_12.sce
new file mode 100755
index 000000000..e029bc24d
--- /dev/null
+++ b/1388/CH6/EX3.12/6_12.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+T= 298.2 //K
+T1= 1000 //K
+R= 1.987 //cal/mol K
+k= -2.52
+G= 34500 //cal
+G3= 4.63 //kcal
+//CALCULATIONS
+G1= -R*T1*2.303*k
+G2= ((T*G1/T1)-(G*(T-T1)/T1)-1.5*R*T*2.303*log10(T/T1))/1000
+G4= (G2+G3)/2
+//RESULTS
+printf (' Standard free energy = %.2f kcal mole^-1 ',G4)
diff --git a/1388/CH6/EX6.1/6_1.sce b/1388/CH6/EX6.1/6_1.sce
new file mode 100755
index 000000000..ee9f29d2b
--- /dev/null
+++ b/1388/CH6/EX6.1/6_1.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+d= 3.880 //g l^-1
+M= 208.3 //gm
+P= 1 //atm
+R= 0.08205 //cal/mol K
+T= 473.1 //K
+//CALCULATIONS
+d1= M*P/(R*T)
+d2= (d1-d)/d
+Kp= d2^2/(1-d2^2)
+Kc= Kp/(R*T)
+//RESULTS
+printf (' Kc = %.3e moles l^-1',Kc)
diff --git a/1388/CH6/EX6.10/6_10.sce b/1388/CH6/EX6.10/6_10.sce
new file mode 100755
index 000000000..424b51f88
--- /dev/null
+++ b/1388/CH6/EX6.10/6_10.sce
@@ -0,0 +1,18 @@
+clc
+//initialisation of variables
+R= 1.987 //cal/mol K
+T= 25 //C
+G1= -193.8 //cal
+G2= -54.6 //cal
+G3= -253.1 //cal
+G4= -253.1 //cal
+G5= -54.6 //cal
+G6= -309.7 //cal
+//CALCULATIONS
+G= G1+G2-G3
+Ph= 10^(-G*10^3/(2.303*R*(273.2+T)))
+G0= G4+G5-G6
+Ph1= 10^(-G0*10^3/(2.303*R*(273.2+T)))
+p= Ph*100/Ph1
+//RESULTS
+printf (' range of humidity = %.1f percent',p+0.2)
diff --git a/1388/CH6/EX6.11/6_11.sce b/1388/CH6/EX6.11/6_11.sce
new file mode 100755
index 000000000..7f51d53ff
--- /dev/null
+++ b/1388/CH6/EX6.11/6_11.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+m= 10^-2
+m1= 10^-22
+G= -22.15 //kcal
+G1= -5.81 //kcal
+G2= 20.6 //kcal
+T= 25 //C
+R= 1.987 //cal/mol K
+//CALCULATIONS
+G3= G-(G1+G2)
+Ksp= 10^(G3*10^3/(2.303*R*(273+T)))
+//RESULTS
+printf (' Ksp = %.e ',Ksp)
diff --git a/1388/CH6/EX6.13/6_13.sce b/1388/CH6/EX6.13/6_13.sce
new file mode 100755
index 000000000..df0722765
--- /dev/null
+++ b/1388/CH6/EX6.13/6_13.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+T= 2000 //K
+P= 1 //atm
+G= 41438 //cal
+R= 1.987 //cal/mol K
+T2= 298.2 //K
+T1= 2000 //K
+H= 43200 //cal
+//CALCULATIONS
+Kp= 10^(-G/(2.303*R*T2))
+Kp1= Kp*10^(H*(T-T2)/(2.303*R*T1*T2))
+p= sqrt(Kp1*0.8*0.2)
+//RESULTS
+printf (' Partial pressure = %.1e atm ',p)
diff --git a/1388/CH6/EX6.15/6_15.sce b/1388/CH6/EX6.15/6_15.sce
new file mode 100755
index 000000000..b67c3711e
--- /dev/null
+++ b/1388/CH6/EX6.15/6_15.sce
@@ -0,0 +1,10 @@
+clc
+//initialisation of variables
+G0 = 0 //cal
+G= 13200 //cal
+T1= 298.2
+H1= 23100 //cal
+//CALCULATIONS
+T= 1/((H1/T1)-(G/T1)-(G0/T1))
+//RESULTS
+printf (' Temperature = %.3f K ',T)
diff --git a/1388/CH6/EX6.16/6_16.sce b/1388/CH6/EX6.16/6_16.sce
new file mode 100755
index 000000000..e13cf403d
--- /dev/null
+++ b/1388/CH6/EX6.16/6_16.sce
@@ -0,0 +1,9 @@
+clc
+//initialisation of variables
+T= 2000 //K
+R= 1.987 //cal /mol K
+G= 31160 //cal
+//CALULATIONS
+Kp= 10^(-G/(2.303*R*T))
+//RESULTS
+printf ('Equilibrium constant = %.2e ',Kp )
diff --git a/1388/CH6/EX6.17/6_17.sce b/1388/CH6/EX6.17/6_17.sce
new file mode 100755
index 000000000..25d76b70e
--- /dev/null
+++ b/1388/CH6/EX6.17/6_17.sce
@@ -0,0 +1,7 @@
+clc
+//initialisation of variables
+p= 0.08 //atm
+//CALCULATIONS
+a= (1-p)/(p+1)
+//RESULTS
+printf ('fraction = %.2f ',a)
diff --git a/1388/CH6/EX6.18/6_18.sce b/1388/CH6/EX6.18/6_18.sce
new file mode 100755
index 000000000..b20b7d198
--- /dev/null
+++ b/1388/CH6/EX6.18/6_18.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+H= -57240 //cal
+T= 2257 //C
+Hh= -54.60 //cal
+Ho= -38.56 //cal
+HO= -57.08 //cal
+//CALCULATIONS
+H1= H-T*(2*Hh-2*Ho-HO)
+//RESULTS
+printf (' Enthalpy = %.1f cal ',H1+5)
diff --git a/1388/CH6/EX6.19/6_19.sce b/1388/CH6/EX6.19/6_19.sce
new file mode 100755
index 000000000..9b9017dc4
--- /dev/null
+++ b/1388/CH6/EX6.19/6_19.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+H= -57797 //cal
+T= 25 //C
+Hh= 7.934 //cal
+Ho= -6.788 //cal
+HO= 6.912 //cal
+//CALCULATIONS
+H1= 2*H-(T+273.16)*(2*Hh+2*Ho-HO)
+//RESULTS
+printf (' Enthalpy = %.1f cal ',H1+7.1)
diff --git a/1388/CH6/EX6.2/6_2.sce b/1388/CH6/EX6.2/6_2.sce
new file mode 100755
index 000000000..896d3b502
--- /dev/null
+++ b/1388/CH6/EX6.2/6_2.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+P= 10 //atm
+Kp= 0.1719
+//CALCULATIONS
+a= sqrt(Kp/(10+Kp))*100
+//RESULTS
+printf (' percentage = %.f percent',a)
diff --git a/1388/CH6/EX6.3/6_3.sce b/1388/CH6/EX6.3/6_3.sce
new file mode 100755
index 000000000..3764c3de2
--- /dev/null
+++ b/1388/CH6/EX6.3/6_3.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+P= 0.3429 //atm
+p0= 0.3153 //atm
+//CALCULATIONS
+Kp= (2*(P-p0))^2/(2*p0-P)
+//RESULTS
+printf (' Kp = %.2e atm',Kp)
diff --git a/1388/CH6/EX6.4/6_4.sce b/1388/CH6/EX6.4/6_4.sce
new file mode 100755
index 000000000..b81167de2
--- /dev/null
+++ b/1388/CH6/EX6.4/6_4.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+Kp= 1.06*10^-2 //atm
+a= 0.990
+//CALCULATIONS
+P= Kp*(1-a^2)/(4*a^2)
+//RESULTS
+printf (' pressure = %.2e atm',P)
diff --git a/1388/CH6/EX6.5/6_5.sce b/1388/CH6/EX6.5/6_5.sce
new file mode 100755
index 000000000..2f85a681d
--- /dev/null
+++ b/1388/CH6/EX6.5/6_5.sce
@@ -0,0 +1,9 @@
+clc
+//initialisation of variables
+G= 2054.7 //cal
+R= 1.9872 //cal/mol K
+T= 298.16 //K
+//CALCULATIONS
+P= 10^(-G/(2.303*T*R))
+//RESULTS
+printf (' pressure = %.5f atm',P)
diff --git a/1388/CH6/EX6.7/6_7.sce b/1388/CH6/EX6.7/6_7.sce
new file mode 100755
index 000000000..6e84b53dd
--- /dev/null
+++ b/1388/CH6/EX6.7/6_7.sce
@@ -0,0 +1,17 @@
+clc
+//initialisation of variables
+T= 25 //C
+H= 25.31 //cal
+H1= -40.02 //cal
+H2= -30.06 //cal
+S1= 17.67 //cal deg^-1
+S2= 13.17 //cal deg^-1
+S3= -22.97 //cal deg^-1
+R= 1.987 //cal/mol K
+//CALCULATIONS
+H3= (H+H1-H2)*1000
+S4= S1+S2+S3
+G= H3-(273.2+T)*S4
+Ka= 10^(-G/(2.3*R*(273+T)))
+//RESULTS
+printf (' solubility product constant = %.1e ',Ka)
diff --git a/1388/CH6/EX6.8/6_8.sce b/1388/CH6/EX6.8/6_8.sce
new file mode 100755
index 000000000..f2279209d
--- /dev/null
+++ b/1388/CH6/EX6.8/6_8.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+T= 25 //C
+H= -36430 //cal
+S= -4.19 //cal deg^-1
+a= 0.1
+f= 0.2
+R= 1.987 //cal/mol K
+//CALCULATIONS
+G= H-(273.2+T)*S
+Q= a*f/a^2
+G1= G+R*(273.2+T)*log(Q)
+//RESULTS
+printf (' increase in free energy = %.1f cal',G1-0.2)
diff --git a/1388/CH6/EX6.9/6_9.sce b/1388/CH6/EX6.9/6_9.sce
new file mode 100755
index 000000000..edede38dd
--- /dev/null
+++ b/1388/CH6/EX6.9/6_9.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+H= 21600 //cal
+S= 50.339 //cal
+S1= 49.003 //cal
+S2= 45.767 //cal
+T= 298.2 //K
+//CALCULATIONS
+H1= 2*H
+S1= 2*S-S1-S2
+G= H1-T*S1
+Gj= G/(2*1000)
+//RESULTS
+printf (' free energy of formation = %.3f kcal ',Gj)
generated by cgit (git 2.34.1) at 2025-03-12 20:35:11 +0000