summaryrefslogtreecommitdiff
path: root/3755/CH10
diff options
context:
space:
mode:
Diffstat (limited to '3755/CH10')
-rw-r--r--3755/CH10/EX10.1/Ex10_1.sce15
-rw-r--r--3755/CH10/EX10.10/Ex10_10.sce16
-rw-r--r--3755/CH10/EX10.11/Ex10_11.sce15
-rw-r--r--3755/CH10/EX10.12/Ex10_12.sce16
-rw-r--r--3755/CH10/EX10.13/Ex10_13.sce20
-rw-r--r--3755/CH10/EX10.14/Ex10_14.sce16
-rw-r--r--3755/CH10/EX10.15/Ex10_15.sce18
-rw-r--r--3755/CH10/EX10.16/Ex10_16.sce19
-rw-r--r--3755/CH10/EX10.17/Ex10_17.sce16
-rw-r--r--3755/CH10/EX10.18/Ex10_18.sce16
-rw-r--r--3755/CH10/EX10.2/Ex10_2.sce17
-rw-r--r--3755/CH10/EX10.3/Ex10_3.sce20
-rw-r--r--3755/CH10/EX10.4/Ex10_4.sce16
-rw-r--r--3755/CH10/EX10.5/Ex10_5.sce19
-rw-r--r--3755/CH10/EX10.6/Ex10_6.sce21
-rw-r--r--3755/CH10/EX10.7/Ex10_7.sce16
-rw-r--r--3755/CH10/EX10.8/Ex10_8.sce17
-rw-r--r--3755/CH10/EX10.9/Ex10_9.sce17
18 files changed, 310 insertions, 0 deletions
diff --git a/3755/CH10/EX10.1/Ex10_1.sce b/3755/CH10/EX10.1/Ex10_1.sce
new file mode 100644
index 000000000..200faa2de
--- /dev/null
+++ b/3755/CH10/EX10.1/Ex10_1.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+P=4.3*10^-8; //polarisation(per cm^2)
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+E=1000; //electric field(V/m)
+
+//Calculations
+epsilonr=1+(P/(epsilon0*E)); //relative permittivity
+
+//Result
+printf("\n relative permittivity is %0.2f ",epsilonr)
diff --git a/3755/CH10/EX10.10/Ex10_10.sce b/3755/CH10/EX10.10/Ex10_10.sce
new file mode 100644
index 000000000..65a08a07c
--- /dev/null
+++ b/3755/CH10/EX10.10/Ex10_10.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+epsilonr=1.0000684; //dielectric constant
+N=2.7*10^25; //number of atoms
+
+//Calculations
+alphae=epsilon0*(epsilonr-1)/N; //electronic polarizability(Fm^2)
+
+//Result
+printf("\n electronic polarizability is %e Fm^2",alphae)
+printf("\n answer varies due to rounding off errors")
diff --git a/3755/CH10/EX10.11/Ex10_11.sce b/3755/CH10/EX10.11/Ex10_11.sce
new file mode 100644
index 000000000..808162e85
--- /dev/null
+++ b/3755/CH10/EX10.11/Ex10_11.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.854*10^-12; //relative permeability(F/m)
+alphae=10^-40; //dielectric polarizability(Fm^2)
+N=3*10^28; //number of atoms
+
+//Calculations
+epsilonr=1+(N*alphae/epsilon0); //dielectric constant
+
+//Result
+printf("\n dielectric constant is %e ",epsilonr)
diff --git a/3755/CH10/EX10.12/Ex10_12.sce b/3755/CH10/EX10.12/Ex10_12.sce
new file mode 100644
index 000000000..12fd228b4
--- /dev/null
+++ b/3755/CH10/EX10.12/Ex10_12.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+epsilonr=1.0024; //dielectric constant
+N=2.7*10^25; //number of atoms
+
+//Calculations
+alphae=epsilon0*(epsilonr-1)/N; //electronic polarizability(Fm^2)
+
+//Result
+printf("\n electronic polarizability is %0.1f *10^-40 Fm^2",alphae*10^40)
+printf("\n answer in the book is wrong")
diff --git a/3755/CH10/EX10.13/Ex10_13.sce b/3755/CH10/EX10.13/Ex10_13.sce
new file mode 100644
index 000000000..36b840992
--- /dev/null
+++ b/3755/CH10/EX10.13/Ex10_13.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilonr=1.0000684; //dielectric constant
+N=2.7*10^25; //number of atoms
+X=1/(9*10^9);
+E=10^6; //electric field(V/m)
+Z=2; //atomic number
+e=1.6*10^-19; //electron charge(coulomb)
+
+//Calculations
+R=((epsilonr-1)/(4*%pi*N))^(1/3); //radius of electron cloud(m)
+x=X*E*R^3/(Z*e); //displacement(m)
+
+//Result
+printf("\n radius of electron cloud is %0.2f *10^-11 m",R*10^11)
+printf("\n displacement is %0.5f *10^-17 m",x*10^17)
diff --git a/3755/CH10/EX10.14/Ex10_14.sce b/3755/CH10/EX10.14/Ex10_14.sce
new file mode 100644
index 000000000..d142ba98e
--- /dev/null
+++ b/3755/CH10/EX10.14/Ex10_14.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //dielectric constant
+N=3*10^28; //number of atoms
+alphae=10^-40; //dielectric polarizability(Fm^2)
+
+//Calculations
+x=N*alphae/(3*epsilon0);
+epsilonr=(1+(2*x))/(1-x); //dielectric constant
+
+//Result
+printf("\n dielectric constant is %0.2f ",epsilonr)
diff --git a/3755/CH10/EX10.15/Ex10_15.sce b/3755/CH10/EX10.15/Ex10_15.sce
new file mode 100644
index 000000000..8e00ce9e0
--- /dev/null
+++ b/3755/CH10/EX10.15/Ex10_15.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //dielectric constant
+Na=6.023*10^26; //number of atoms
+M=32; //atomic mass
+alphae=3.28*10^-40; //dielectric polarizability(Fm^2)
+rho=2.08*10^3; //density(kg/m^3)
+
+//Calculations
+x=Na*rho*alphae/(M*3*epsilon0);
+epsilonr=(1+(2*x))/(1-x); //dielectric constant
+
+//Result
+printf("\n dielectric constant is %0.1f ",epsilonr)
diff --git a/3755/CH10/EX10.16/Ex10_16.sce b/3755/CH10/EX10.16/Ex10_16.sce
new file mode 100644
index 000000000..da25ebeb8
--- /dev/null
+++ b/3755/CH10/EX10.16/Ex10_16.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //dielectric constant
+Na=6.02*10^26; //number of atoms
+epsilonr=3.75; //dielectric constant
+M=32; //atomic mass
+rho=2050; //density(kg/m^3)
+gama=1/3; //internal field constant
+
+//Calculations
+N=Na*rho/M; //number of atoms
+alphae=((epsilonr-1)/(epsilonr+2))*(3*epsilon0/N); //electronic polarizability(Fm^2)
+
+//Result
+printf("\n electronic polarizability is %0.2f *10^-40 Fm^2",alphae*10^40)
diff --git a/3755/CH10/EX10.17/Ex10_17.sce b/3755/CH10/EX10.17/Ex10_17.sce
new file mode 100644
index 000000000..6fc6f09a3
--- /dev/null
+++ b/3755/CH10/EX10.17/Ex10_17.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilonr=4.94; //dielectric constant
+n2=2.69;
+
+//Calculations
+x=(epsilonr-1)/(epsilonr+2);
+y=(n2-1)/(n2+2);
+alpha=1/((x/y)-1); //ratio between electronic and ionic polarizability
+
+//Result
+printf("\n ratio between electronic and ionic polarizability is %0.3f ",alpha)
diff --git a/3755/CH10/EX10.18/Ex10_18.sce b/3755/CH10/EX10.18/Ex10_18.sce
new file mode 100644
index 000000000..cc8a592ec
--- /dev/null
+++ b/3755/CH10/EX10.18/Ex10_18.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilonr=5.6; //dielectric constant
+n=1.5;
+
+//Calculations
+x=(epsilonr+2)/(epsilonr-1);
+y=(n^2-1)/(n^2+2);
+alpha=(1-(x*y))*100; //percentage of ionic polarizability
+
+//Result
+printf("\n percentage of ionic polarizability is %0.1f percentage",alpha)
diff --git a/3755/CH10/EX10.2/Ex10_2.sce b/3755/CH10/EX10.2/Ex10_2.sce
new file mode 100644
index 000000000..80a737297
--- /dev/null
+++ b/3755/CH10/EX10.2/Ex10_2.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+k=4;
+epsilon0=9*10^-12; //relative permeability(F/m)
+E=10^6; //electric field(V/m)
+
+//Calculations
+D=k*epsilon0*E; //electric displacement(C/m^2)
+P=epsilon0*E*(k-1); //polarisation(C/m^2)
+
+//Result
+printf("\n electric displacement is %0.0f *10^-6 C/m^2",D*10^6)
+printf("\n polarisation is %0.0f *10^-6 C/m^2",P*10^6)
diff --git a/3755/CH10/EX10.3/Ex10_3.sce b/3755/CH10/EX10.3/Ex10_3.sce
new file mode 100644
index 000000000..42a32d913
--- /dev/null
+++ b/3755/CH10/EX10.3/Ex10_3.sce
@@ -0,0 +1,20 @@
+clear
+//
+//
+//
+
+//Variable declaration
+k=5;
+epsilon0=8.86*10^-12; //relative permeability(F/m)
+D=5*10^-12; //electric displacement(C/m^2)
+V=0.5*10^-6;
+
+//Calculations
+E=D/(k*epsilon0); //electric field(N/C)
+P=D*(1-(1/k)); //polarisation(C/m^2)
+dm=P*V; //induced dipole moment(cm)
+
+//Result
+printf("\n electric field is %e N/C",E)
+printf("\n polarisation is %e C/m^2",P)
+printf("\n induced dipole moment is %e cm",dm)
diff --git a/3755/CH10/EX10.4/Ex10_4.sce b/3755/CH10/EX10.4/Ex10_4.sce
new file mode 100644
index 000000000..bc7376531
--- /dev/null
+++ b/3755/CH10/EX10.4/Ex10_4.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+k=1.000074;
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+E=1; //electric field(N/C)
+n=2.69*10^25; //molecular density
+
+//Calculations
+p=epsilon0*E*(k-1)/n; //dipole moment(coulx metre)
+
+//Result
+printf("\n dipole moment is %0.2f *10^-41 coul x metre",p*10^41)
diff --git a/3755/CH10/EX10.5/Ex10_5.sce b/3755/CH10/EX10.5/Ex10_5.sce
new file mode 100644
index 000000000..bb908446a
--- /dev/null
+++ b/3755/CH10/EX10.5/Ex10_5.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+k=1.000134;
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+E=90000; //electric field(N/C)
+N=6.023*10^26; //avagadro number
+
+//Calculations
+n=N/22.4;
+p=epsilon0*E*(k-1)/n; //dipole moment(coul-metre)
+alpha=p/E; //atomic polarizability(coul-m^2/volt)
+
+//Result
+printf("\n dipole moment is %0.2f *10^-36 coul-metre",p*10^36)
+printf("\n atomic polarizability is %0.1f *10^-41 coul-m^2/volt",alpha*10^41)
diff --git a/3755/CH10/EX10.6/Ex10_6.sce b/3755/CH10/EX10.6/Ex10_6.sce
new file mode 100644
index 000000000..1491fb91a
--- /dev/null
+++ b/3755/CH10/EX10.6/Ex10_6.sce
@@ -0,0 +1,21 @@
+clear
+//
+//
+//
+
+//Variable declaration
+k=7;
+epsilon0=8.9*10^-12; //relative permeability(F/m)
+V0=100; //potential difference(V)
+d=10^-2; //displacement(m)
+
+//Calculations
+E0=V0/d; //electric field intensity(volt/m)
+E=E0/k; //electric field(N/C)
+D=k*E*epsilon0; //electric displacement(C/m^2)
+p=epsilon0*E*(k-1); //dipole moment(coul-metre)
+
+//Result
+printf("\n electric field is %0.2f *10^3 volt/m",E/10^3)
+printf("\n electric displacement is %e C/m^2",D)
+printf("\n dipole moment is %0.1f *10^-8 C/m^2",p*10^8)
diff --git a/3755/CH10/EX10.7/Ex10_7.sce b/3755/CH10/EX10.7/Ex10_7.sce
new file mode 100644
index 000000000..2192718ac
--- /dev/null
+++ b/3755/CH10/EX10.7/Ex10_7.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+chi=35.4*10^-12; //electric susceptibility(coul^2/nt-m^2)
+
+//Calculations
+k=1+(chi/epsilon0); //dielectric constant
+epsilon=epsilon0*k; //permittivity(coul^2/nt-m^2)
+
+//Result
+printf("\n dielectric constant is %0.3f ",k)
+printf("\n permittivity is %0.2f *10^-12 coul^2/nt-m^2",epsilon*10^12)
diff --git a/3755/CH10/EX10.8/Ex10_8.sce b/3755/CH10/EX10.8/Ex10_8.sce
new file mode 100644
index 000000000..8191302c8
--- /dev/null
+++ b/3755/CH10/EX10.8/Ex10_8.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+E=100; //electric field(N/C)
+epsilonr=1.000074; //dielectric constant
+n=2.68*10^27; //density
+
+//Calculations
+p=epsilon0*E*(epsilonr-1)/n; //dipole moment(coul-metre)
+
+//Result
+printf("\n dipole moment is %0.4f *10^-41 C/m^2",p*10^41)
+printf("\n answer in the book is wrong")
diff --git a/3755/CH10/EX10.9/Ex10_9.sce b/3755/CH10/EX10.9/Ex10_9.sce
new file mode 100644
index 000000000..7248ed30f
--- /dev/null
+++ b/3755/CH10/EX10.9/Ex10_9.sce
@@ -0,0 +1,17 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //relative permeability(F/m)
+R=0.053*10^-9; //radius(nm)
+N=9.8*10^26; //number of atoms
+
+//Calculations
+alphae=4*%pi*epsilon0*R^3; //electronic polarizability(Fm^2)
+epsilonr=1+(4*%pi*N*R^3); //relative permittivity
+
+//Result
+printf("\n electronic polarizability is %0.4f *10^-41 Fm^2",alphae*10^41)
+printf("\n relative permittivity is %0.4f ",epsilonr)