summaryrefslogtreecommitdiff
path: root/3768/CH8/EX8.1/Ex8_1.sce
blob: ecfd14a527d19a49e14ed6ccdf2c075db59f2e44 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Example number 8.1, Page number 170

clc;clear;
close;

//Variable declaration
r=0.05*10**-9;     //radius(m)
B=1;     //magnetic induction(web/m**2)
e=1.6*10**-19;    //charge(c)
m=9.1*10**-31;    //mass(kg)
//Calculation
d_mew=e**2*r**2*B/(4*m);       //change in magnetic moment(Am**2)
//Result
printf("change in magnetic moment is %.2e Am^2",d_mew)
//answer in the book is wrong