summaryrefslogtreecommitdiff
path: root/3669/CH7/EX7.7/7.sce
blob: 33ad17389bbb52acb5fdd54a8fb936e95981f1dd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13

//Variable declaration
r=0.052*10**-9;     //radius(m)
B=3;     //flux density(Wb/m**2)
e=1.6*10**-19;  
m=9.1*10**-31;    //mass(kg)

//Calculation
delta_mew=e**2*r**2*B/(4*m);     //change in magnetic moment(A m**2)

//Result
printf('change in magnetic moment is %0.3f   *10**-29 Am**2  \n',(delta_mew*10**29))
printf('answer given in the book is wrong\n')