summaryrefslogtreecommitdiff
path: root/1970/CH1/EX1.5/Ch01Exa5.sce
blob: 1e6a89bc1e3895c2e612c1c1b3f7df03a233c72f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
// Scilab code Exa1.5 :  : Page 52 (2011) 
clc; clear;
e = 1.60218e-019;        // Charge of an electron, C
A = 33;                // Atomic mass of Chlorine, amu
K = 9e+09;            // Coulomb constant, newton metre sqaure per coulomb square
E = 6.1*1.60218e-013;        // Coulomb energy, joule
R_0 = 3/5*K/E*e^2*(A)^(2/3); // Distance of closest approach, metre
R = R_0*A^(1/3);             // Radius of the nucleus, metre
printf("\nRadius of the nucleus : %4.2e metre", R);

// Result
// Radius of the nucleus : 4.6805e-015 metre