6 files changed, 125 insertions, 0 deletions
diff --git a/3763/CH6/EX6.1/Ex6_1.sce b/3763/CH6/EX6.1/Ex6_1.sce
new file mode 100644
index 000000000..2834c3614
--- /dev/null
+++ b/3763/CH6/EX6.1/Ex6_1.sce
@@ -0,0 +1,22 @@
+clear
+//
+//
+//
+
+//Variable declaration
+rho=5*10**16   //resistivity(ohm m)
+l=5*10**-2    //thickness(m)
+b=8*10**-2    //length(m)
+w=3*10**-2    //width(m)
+
+//Calculation
+A=b*w    //area(m**2)
+Rv=rho*l/A    
+X=l+b      //length(m)
+Y=w      //perpendicular(m)
+Rs=Rv*X/Y    
+Ri=Rs*Rv/(Rs+Rv)       //insulation resistance(ohm)
+
+//Result
+printf("\n insulation resistance is %0.2f  *10**18 ohm",Ri/10**18)
+printf("\n answer varies due to rounding off errors")
diff --git a/3763/CH6/EX6.2/Ex6_2.sce b/3763/CH6/EX6.2/Ex6_2.sce
new file mode 100644
index 000000000..d0378541d
--- /dev/null
+++ b/3763/CH6/EX6.2/Ex6_2.sce
@@ -0,0 +1,24 @@
+clear
+//
+//
+//
+
+//Variable declaration
+rho=10**10   //resistivity(ohm m)
+d=10**-3    //thickness(m)
+A=10**4*10**-6    //area(m**2)
+V=10**3    //voltage(V)
+f=50     //power frequency(Hz)
+epsilonr=8
+epsilon0=8.84*10**-12
+tan_delta=0.1
+
+//Calculation
+Rv=rho*d/A 
+dl_DC=V**2/Rv      //DC dielectric loss(watt)
+C=A*epsilon0*epsilonr/d
+dl_AC=V**2*2*%pi*f*C*tan_delta     //AC dielectric loss(watt)
+
+//Result
+printf("\n DC dielectric loss is %0.0f  *10**-3 watt",dl_DC*10**3)
+printf("\n AC dielectric loss is %0.2f  *10**-3 watt",dl_AC*10**3)
diff --git a/3763/CH6/EX6.3/Ex6_3.sce b/3763/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..8761c7e6c
--- /dev/null
+++ b/3763/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.84*10**-12
+R=0.55*10**-10    //radius(m)
+N=2.7*10**25      //number of atoms
+
+//Calculation
+alpha_e=4*%pi*epsilon0*R**3    //polarisability of He(farad m**2)
+epsilonr=1+(N*alpha_e/epsilon0)      //relative permittivity
+
+//Result
+printf("\n polarisability of He is %0.3f  *10**-40 farad m**2",alpha_e*10**40)
+printf("\n relative permittivity is %0.6f  ",epsilonr)
+printf("\n answer varies due to rounding off errors")
diff --git a/3763/CH6/EX6.4/Ex6_4.sce b/3763/CH6/EX6.4/Ex6_4.sce
new file mode 100644
index 000000000..131705bb5
--- /dev/null
+++ b/3763/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+A=360*10**-4    //area(m**2)
+V=15    //voltage(V)
+C=6*10**-6     //capacitance(farad)
+epsilonr=8
+epsilon0=8.84*10**-12
+
+//Calculation
+E=V*C/(epsilon0*epsilonr*A)     //field strength(V/m)
+dm=epsilon0*(epsilonr-1)*V*A    //total dipole moment(Cm)
+
+//Result
+printf("\n field strength is %0.3f  *10**7 V/m",E/10**7)
+printf("\n total dipole moment is %0.1f  *10**-12 Cm",dm*10**12)
diff --git a/3763/CH6/EX6.5/Ex6_5.sce b/3763/CH6/EX6.5/Ex6_5.sce
new file mode 100644
index 000000000..57b5eff52
--- /dev/null
+++ b/3763/CH6/EX6.5/Ex6_5.sce
@@ -0,0 +1,22 @@
+clear
+//
+//
+//
+
+//Variable declaration
+d=0.08*10**-3    //thickness(m)
+A=8*10**-4    //area(m**2)
+epsilonr=2.56
+epsilon0=8.84*10**-12
+tan_delta=0.7*10**-4
+new=10**6    //frequency(Hz)
+
+//Calculation
+C=A*epsilon0*epsilonr/d     //capacitance(farad)
+epsilonrdash=tan_delta*epsilonr
+omega=2*%pi*new
+R=d/(epsilon0*epsilonrdash*omega*A)     //parallel loss resistance(ohm)
+
+//Result
+printf("\n capacitance is %0.1f  *10**-12 farad",C*10**12)
+printf("\n parallel loss resistance is %0.0f  mega ohm",R/10**6)
diff --git a/3763/CH6/EX6.6/Ex6_6.sce b/3763/CH6/EX6.6/Ex6_6.sce
new file mode 100644
index 000000000..c6dd4e960
--- /dev/null
+++ b/3763/CH6/EX6.6/Ex6_6.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilonr=4.36      //dielectric constant
+t=2.8*10**-2       //loss tangent(t)
+N=4*10**28         //number of electrons
+epsilon0=8.84*10**-12      
+
+//Calculation
+epsilon_r = epsilonr*t
+epsilonstar = (complex(epsilonr,-epsilon_r))
+alphastar = (epsilonstar-1)/(epsilonstar+2)
+alpha_star = 3*epsilon0*alphastar/N             //complex polarizability(Fm**2)
+
+//Result
+printf("\n the complex polarizability is %0.3f  *10**-40 F-m**2",alpha_star*10**40)
+printf("\n answer cant be rouned off to 2 decimals as given in the textbook. Since it is a complex number and complex cant be converted to ")