blob: 10e8461e2c24adb3f12cce8b3c2326afa2f7a84d (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
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)
|
