4 files changed, 45 insertions, 0 deletions
diff --git a/1967/CH9/EX9.1/9_1.sce b/1967/CH9/EX9.1/9_1.sce
new file mode 100755
index 000000000..1e9b979df
--- /dev/null
+++ b/1967/CH9/EX9.1/9_1.sce
@@ -0,0 +1,10 @@
+clc
+//initialisation of variables
+clear
+w= 35.46 //gms
+T= 298.2 //K
+Qc= 4.03 
+//CALCULATIONS
+S= 4.576*(1.5*log10(w)+2.5*log10(T)+log10(Qc)-0.5055)
+//RESULTS
+printf ('Standard entropy = %.1f cal deg^-1 g atom^-1',S)
diff --git a/1967/CH9/EX9.2/9_2.sce b/1967/CH9/EX9.2/9_2.sce
new file mode 100755
index 000000000..d307a23a4
--- /dev/null
+++ b/1967/CH9/EX9.2/9_2.sce
@@ -0,0 +1,13 @@
+clc
+//initialisation of variables
+clear
+M= 28 //gms
+T= 25 //C
+I= 13.9*10^-40 // gcm^2
+s= 2
+//CALCULATIONS
+S= 4.576*(1.5*log10(M)+2.5*log10(273.2+T)-0.5055)
+S1= 4.576*(log10(I)+log10(273.2+T)-log10(s)+38.82)
+//RESULTS
+printf ('Standard entropy = %.1f E.U.mole^-1',S)
+printf ('\n Standard entropy = %.1f E.U.mole^-1',S1)
diff --git a/1967/CH9/EX9.3/9_3.sce b/1967/CH9/EX9.3/9_3.sce
new file mode 100755
index 000000000..257594edc
--- /dev/null
+++ b/1967/CH9/EX9.3/9_3.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+clear
+T= 25 //C
+I= 4.33*10^-40 // gcm^2
+I1= 2.78*10^-40 //g cm^2
+s= 3
+//CALCULATIONS
+S= 4.576*(0.5*log10(I1^2*I)+1.5*log10(273.2+T)-log10(s)+58.51)
+//RESULTS
+printf ('Standard entropy = %.1f cal deg^-1 mole^-1',S)
diff --git a/1967/CH9/EX9.4/9_4.sce b/1967/CH9/EX9.4/9_4.sce
new file mode 100755
index 000000000..b93c54fa3
--- /dev/null
+++ b/1967/CH9/EX9.4/9_4.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+clear
+Sco= 47.3 //cal deg^-1 
+Sh2= 31.21 //cal deg^-1
+Sc= 1.36 //cal deg^-1
+Sho = 16.75 //cal deg^-1
+//CALCULATIONS
+S= Sco+Sh2-Sc-Sho
+//RESULTS
+printf ('Standard entropy = %.2f cal deg^-1 mole^-1',S)