summaryrefslogtreecommitdiff
path: root/3755/CH1/EX1.3/Ex1_3.sce
blob: cac86118daafb102397fe5200814d4665c4e4bd5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
clear
//
//
//

//Variable declaration    
N=6.02*10^26;           //Avagadro Number
e=1.6*10^-19;      //charge(coulomb)
x=9*10^9;          
r0=0.324*10^-9;    //equilibrium distance(m)
A=1.748;      //madelung constant
n=9.5;       //repulsive exponent value

//Calculations
U0=(A*e*x/r0)*(1-1/n);     
U=(U0)*N*e*10^-3;      //binding energy(kJ/kmol)


//Result
printf("\n binding energy is %0.0f *10^3 kJ/kmol",U/10^3)
printf("\n answer in the book varies due to rounding off errors")