diff options
Diffstat (limited to '3840/CH7/EX7.8/Ex7_8.sce')
| -rw-r--r-- | 3840/CH7/EX7.8/Ex7_8.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3840/CH7/EX7.8/Ex7_8.sce b/3840/CH7/EX7.8/Ex7_8.sce new file mode 100644 index 000000000..07e9f04c3 --- /dev/null +++ b/3840/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,16 @@ +clear +// +// +// + +//Variable declaration +r=5.29*10**-11 //radius(m) +B=2 //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("\n change in magnetic moment is %0.3f *10**-29 A-m**2",d_mew*10**29) |