10 files changed, 149 insertions, 0 deletions
diff --git a/3769/CH11/EX11.1/Ex11_1.sce b/3769/CH11/EX11.1/Ex11_1.sce
new file mode 100644
index 000000000..f0ce983b0
--- /dev/null
+++ b/3769/CH11/EX11.1/Ex11_1.sce
@@ -0,0 +1,14 @@
+clear
+//Given
+e=1.6*10**-19
+f=6.8*10**15
+n=1
+r=0.53*10**-10
+
+//Calculation
+//
+I=e*f
+M=n*I*%pi*r**2
+
+//Result
+printf("\n Equivalent magnetic moment is %0.1f *10**-24 Am**2",M*10**24)
diff --git a/3769/CH11/EX11.10/Ex11_10.sce b/3769/CH11/EX11.10/Ex11_10.sce
new file mode 100644
index 000000000..3a40ed875
--- /dev/null
+++ b/3769/CH11/EX11.10/Ex11_10.sce
@@ -0,0 +1,11 @@
+clear
+//Given
+x=1.68*10**-4
+T1=293
+T2=77.4
+
+//Calculation
+x1=(x*T1)/T2
+
+//Result
+printf("\n Susceptibility is %0.2f  *10**-4",x1*10**4)
diff --git a/3769/CH11/EX11.11/Ex11_11.sce b/3769/CH11/EX11.11/Ex11_11.sce
new file mode 100644
index 000000000..62e0c0e1d
--- /dev/null
+++ b/3769/CH11/EX11.11/Ex11_11.sce
@@ -0,0 +1,19 @@
+clear
+//Given
+l=10**-6                     //m
+d=7.9                       //g
+a=6.023*10**23
+n=55.0
+M1=9.27*10**-24
+
+//Calculation
+V=l**2
+M=V*d
+N=(a*M)/n
+Mmax=N*M1
+Imax=Mmax/V*10**-4
+
+//Result
+printf("\n Number of iron atom is %0.2f  *10**10 atoms",N*10**-10)
+printf("\n Magnetisation of the dipole is %0.0f  *10**5 A/m",Imax*10**5)
+printf("\n Maximum possible dipole moment is %0.0f *10**-13 A m**2",Mmax*10**13)
diff --git a/3769/CH11/EX11.2/Ex11_2.sce b/3769/CH11/EX11.2/Ex11_2.sce
new file mode 100644
index 000000000..7cb72eae5
--- /dev/null
+++ b/3769/CH11/EX11.2/Ex11_2.sce
@@ -0,0 +1,19 @@
+clear
+//Given
+E=240
+R=474.0
+r=12.5*10**-2
+N=500
+ur=5000
+
+//Calculation
+//
+I=E/R
+I1=2*%pi*r
+H=(N*I)/I1
+u=4*%pi*10**-7
+B=u*ur*H
+
+//Result
+printf("\n (i) The magnetising force is %0.0f  AT/m",H)
+printf("\n (ii) The magnetic flux density is %0.2f  Wb/m**2",B)
diff --git a/3769/CH11/EX11.3/Ex11_3.sce b/3769/CH11/EX11.3/Ex11_3.sce
new file mode 100644
index 000000000..0fef6c007
--- /dev/null
+++ b/3769/CH11/EX11.3/Ex11_3.sce
@@ -0,0 +1,16 @@
+clear
+//Given
+r1=11
+r2=12
+B=2.5                     //T
+a=3000
+I=0.70                     //A
+
+//Calculation
+//
+r=((r1+r2)/2.0)*10**-2
+n=a/(2*%pi*r)
+ur=B*2*%pi*r/(4*%pi*10**-7*a*I)
+
+//Result
+printf("\n Relative permeability is %0.1f  ",ur)
diff --git a/3769/CH11/EX11.5/Ex11_5.sce b/3769/CH11/EX11.5/Ex11_5.sce
new file mode 100644
index 000000000..e0f763910
--- /dev/null
+++ b/3769/CH11/EX11.5/Ex11_5.sce
@@ -0,0 +1,12 @@
+clear
+//Given
+B=0.6
+H=360.0
+
+//Calculation
+u=B/H
+x=(u-1*4*%pi*10**-7)/(4.0*%pi*10**-7)
+
+//Result
+printf("\n (i) Permeability is %0.2f  *10**-3 T/A m",u*10**3)
+printf("\n (ii) Susceptibility of the material is %0.0f  ",x)
diff --git a/3769/CH11/EX11.6/Ex11_6.sce b/3769/CH11/EX11.6/Ex11_6.sce
new file mode 100644
index 000000000..e1437959f
--- /dev/null
+++ b/3769/CH11/EX11.6/Ex11_6.sce
@@ -0,0 +1,11 @@
+clear
+//Given
+M=8.0*10**22                  //Am**2
+R=64*10**5                    //m
+
+//Calculation
+//
+I=(3*M)/(4.0*%pi*R**3)
+
+//Result
+printf("\n earths magnetisation is %0.1f  A/m",I)
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)
diff --git a/3769/CH11/EX11.8/Ex11_8.sce b/3769/CH11/EX11.8/Ex11_8.sce
new file mode 100644
index 000000000..d591476ca
--- /dev/null
+++ b/3769/CH11/EX11.8/Ex11_8.sce
@@ -0,0 +1,15 @@
+clear
+//Given
+M=8.4                         //g
+d=7200.0
+f=50                              //Hz
+E=3.2*10**4
+t=30*60.0
+
+//Calculation
+V=M/d
+P=E/t
+E1=P/(V*f)
+
+//Result
+printf("\n Energy dissipated per unit volume is %0.0f  J/m**3/cycle",E1)
diff --git a/3769/CH11/EX11.9/Ex11_9.sce b/3769/CH11/EX11.9/Ex11_9.sce
new file mode 100644
index 000000000..6e58981f3
--- /dev/null
+++ b/3769/CH11/EX11.9/Ex11_9.sce
@@ -0,0 +1,12 @@
+clear
+//Given
+H=4*10**3                         //A/m
+a=60
+b=0.12
+
+//Calculation
+n=a/b
+I=H/n
+
+//Result
+printf("\n Current should be sent through the solenoid is %0.3f  A", I)