1 files changed, 20 insertions, 0 deletions
diff --git a/3769/CH11/EX11.7/Ex11_7.sce b/3769/CH11/EX11.7/Ex11_7.sce
new file mode 100644
index 000000000..d6280a93a
--- /dev/null
+++ b/3769/CH11/EX11.7/Ex11_7.sce
@@ -0,0 +1,20 @@
+clear
+//given
+N=1800
+l=0.6
+I=0.9                           //A
+ur=500
+n1=6.02*10**26
+a=55.85
+y=7850
+
+//Calculation
+n=N/l
+H=n*I
+I1=(ur-1)*H
+B=4*%pi*10**-7*ur*H
+x=(y*n1)/a
+X=I1/x
+
+//Result
+printf("\n Average magnetic moment per iron atom is %0.2f *10**-23  A m**2",X*10**23)