3 files changed, 42 insertions, 0 deletions
diff --git a/3492/CH8/EX8.3/Ex8_3.sce b/3492/CH8/EX8.3/Ex8_3.sce
new file mode 100644
index 000000000..38638b7c7
--- /dev/null
+++ b/3492/CH8/EX8.3/Ex8_3.sce
@@ -0,0 +1,13 @@
+clc
+//Chapter8
+//Ex_3
+//Given
+Mat=55.85*10^-3 //in Kg/mol
+NA=6.022*10^23 // in mol^-1
+p=7.86*10^3 //in kg/m3
+Msat=1.75*10^6 //in A/m
+funcprot(0)
+beta=9.27*10^-24 //in J/tesla
+n_at=p*NA/(Mat)
+x=Msat/(n_at*beta)
+printf("In the solid each Fe atom contributes only %f bohr magneton",x)
diff --git a/3492/CH8/EX8.5/Ex8_5.sce b/3492/CH8/EX8.5/Ex8_5.sce
new file mode 100644
index 000000000..173388b21
--- /dev/null
+++ b/3492/CH8/EX8.5/Ex8_5.sce
@@ -0,0 +1,13 @@
+clc
+//Chapter8
+//Ex_5
+//Given
+u_o=4*%pi*10^-7 //in H/m
+u_ri=2*10^3 //
+N=200 //no. of turns
+d=0.005 //in m
+D=2.5*10^-2 //in m
+A=%pi*(d^2)/4
+l=%pi*D
+L=u_ri*u_o*N^2*A/l
+disp(L,"Approximate inductance of the coil in Henry is")
diff --git a/3492/CH8/EX8.7/Ex8_7.sce b/3492/CH8/EX8.7/Ex8_7.sce
new file mode 100644
index 000000000..d03f9d41c
--- /dev/null
+++ b/3492/CH8/EX8.7/Ex8_7.sce
@@ -0,0 +1,16 @@
+clc
+//Chapter8
+//Ex_7
+//Given
+N=500 //no.of turns
+B=5 //in Tesla
+l=1 //in m
+r=10^-3 //in m
+uo=4*%pi*10^-7 //in H/m
+d=10*10^-2 //in m
+I=(B*l)/(uo*N)
+disp(I,"current in Amperes is")
+E_vol=B^2/(2*uo)
+v=%pi*l*d^2/4
+E=E_vol*v
+disp(E,"Energy stored in the solenoid in joules is")