blob: 0c36bfa60811327bf64d0112ffb2482ae9659130 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
// Scilab Code Ex12.10 : Page-608 (2011)
clc; clear;
e = 1.6e-19;....// Charge on anlectron, C
m = 9.1e-31;....// Mass of the electron, kg
r = 5.1e-11;....// Radius of the electronic orbit, m
B = 2.0;....// Applied magnetic field, weber per metre-square
delta_pm = e^2*r^2*B/(4*m);
printf("\nThe change in the magnetic dipole moment of the electron = %3.1e A-metre square", delta_pm);
// Result
// The change in the magnetic dipole moment of the electron = 3.7e-29 A-metre square
|