1 files changed, 21 insertions, 0 deletions
diff --git a/3768/CH1/EX1.1/Ex1_1.sce b/3768/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..10e8461e2
--- /dev/null
+++ b/3768/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,21 @@
+//Example number 1.1, Page number 10
+clc;clear;
+close;
+
+//Variable declaration
+e=1.6*10**-19;      //charge(coulomb)
+epsilon0=8.85*10**-12;   
+r0=23.6*10**-10;    //equilibrium distance(m)
+I=5.14;    //ionisation energy(eV)
+EA=3.65;   //electron affinity(eV)
+N=8;     //born constant
+
+//Calculation
+x=1-(1/N);
+V=(e**2)*x/(4*e*%pi*epsilon0*r0);   //potential(V)
+E=I-EA;        //net energy(eV)
+BE=(V*10)-E;        //bond energy(eV)
+
+//Result
+printf( "bond energy = %.2f eV",BE)
+