summaryrefslogtreecommitdiff
path: root/3768/CH8/EX8.1/Ex8_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3768/CH8/EX8.1/Ex8_1.sce')
-rw-r--r--3768/CH8/EX8.1/Ex8_1.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3768/CH8/EX8.1/Ex8_1.sce b/3768/CH8/EX8.1/Ex8_1.sce
new file mode 100644
index 000000000..ecfd14a52
--- /dev/null
+++ b/3768/CH8/EX8.1/Ex8_1.sce
@@ -0,0 +1,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