diff options
Diffstat (limited to '3669/CH1/EX1.5/5.sce')
| -rw-r--r-- | 3669/CH1/EX1.5/5.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3669/CH1/EX1.5/5.sce b/3669/CH1/EX1.5/5.sce new file mode 100644 index 000000000..121913e1f --- /dev/null +++ b/3669/CH1/EX1.5/5.sce @@ -0,0 +1,12 @@ +
+//Variable declaration
+m=1;
+n=9; //repulsive exponent value
+a=1.748*10**-28;
+r0=0.281*10**-9; //seperation(m)
+e=1.6*10**-19;
+//Calculation
+Ur0=-a*(1-(m/n))/(e*r0**m); //cohesive energy(eV)
+
+//Result
+printf('cohesive energy is %0.3f eV \n',(Ur0))
|