4 files changed, 74 insertions, 0 deletions
diff --git a/3665/CH1/EX1.1/Ex1_1.sce b/3665/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..85906a944
--- /dev/null
+++ b/3665/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,20 @@
+clc//
+//
+//
+
+//Variable declaration
+e=1.602*10^-19;   //charge of electron(c)
+epsilon0=8.85*10^-12;    //permittivity(C/Nm)
+r=3*10^-10;     //seperation(m)
+N=6.022*10^20;
+Ea=502;     //ionisation energy of A(kJ/mol)
+Eb=-335;    //electron affinity for B(kJ/mol)
+
+//Calculation
+E=-e^2*N/(4*%pi*epsilon0*r);    //electrostatic attraction(kJ/mol)
+nE=Ea+Eb+E;    //net change in energy per mole(kJ/mol)
+
+//Result
+printf("\n net change in energy per mole is %0.0f kJ/mol",nE)
+printf("\n answer varies due to rounding off errors")
+printf("\n since the net change in energy is negative, the A+B- molecule will be stable")
diff --git a/3665/CH1/EX1.2/Ex1_2.sce b/3665/CH1/EX1.2/Ex1_2.sce
new file mode 100644
index 000000000..3bd749051
--- /dev/null
+++ b/3665/CH1/EX1.2/Ex1_2.sce
@@ -0,0 +1,18 @@
+clc//
+//
+//
+
+//Variable declaration
+IPk=4.1;    //IP of K(eV)
+EACl=3.6;    //EA of Cl(eV)
+e=1.602*10^-19;   //charge of electron(c)
+onebyepsilon0=9*10^9;
+
+//Calculation
+deltaE=IPk-EACl;
+Ec=deltaE;      //energy required(eV)
+R=e*onebyepsilon0/deltaE;     //seperation(m)
+
+//Result
+printf("\n energy required is %0.3f eV",Ec)
+printf("\n seperation is %0.2f nm",R*10^9)
diff --git a/3665/CH1/EX1.3/Ex1_3.sce b/3665/CH1/EX1.3/Ex1_3.sce
new file mode 100644
index 000000000..f94fa722e
--- /dev/null
+++ b/3665/CH1/EX1.3/Ex1_3.sce
@@ -0,0 +1,18 @@
+clc//
+//
+//
+
+//Variable declaration
+e=1.602*10^-19;   //charge of electron(c)
+epsilon0=8.85*10^-12;    //permittivity(C/Nm)
+r0=236*10^-12;     //seperation(m)
+N=6.022*10^20;
+IP=5.14;     //ionisation energy of A(kJ/mol)
+EA=3.65;    //electron affinity for B(kJ/mol)
+
+//Calculation
+Ue=-e^2/(4*%pi*epsilon0*r0*e);    //potential energy(eV)
+BE=-Ue-IP+EA;      //bond energy(eV)
+
+//Result
+printf("\n bond energy is %0.2f eV",BE)
diff --git a/3665/CH1/EX1.4/Ex1_4.sce b/3665/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..2bbe73b8a
--- /dev/null
+++ b/3665/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,18 @@
+clc//
+//
+//
+
+//Variable declaration
+A=1.748;       //madelung constant
+n=9;     //born repulsive exponent
+e=1.602*10^-19;   //charge of electron(c)
+epsilon0=8.85*10^-12;    //permittivity(C/Nm)
+r0=0.281*10^-9;     //seperation(m)
+IE=5.14;     //ionisation energy of A(kJ/mol)
+EA=3.61;    //electron affinity for B(kJ/mol)
+
+//Calculation
+CE=A*e^2*(1-(1/n))/(4*%pi*epsilon0*r0*e);      //cohesive energy(eV)
+
+//Result
+printf("\n cohesive energy is %0.3f eV",CE)