1826/CH4/EX4.1/ex4_1.sce


1
2
3
4
5
6
7
8

// Example 4.1, page no-92
clear
clc
R=2.81*10^-10 //m
e=1.6*10^-19
eps=8.854*10^-12
U=-(e^2)/(4*%pi*eps*R)
printf("The Coulomb interatomic energy is %.2f eV",U*10^19/1.6)