summaryrefslogtreecommitdiff
path: root/3669/CH6
diff options
context:
space:
mode:
Diffstat (limited to '3669/CH6')
-rw-r--r--3669/CH6/EX6.1/1.sce11
-rw-r--r--3669/CH6/EX6.10/10.sce18
-rw-r--r--3669/CH6/EX6.11/11.sce11
-rw-r--r--3669/CH6/EX6.12/12.sce14
-rw-r--r--3669/CH6/EX6.2/2.sce14
-rw-r--r--3669/CH6/EX6.3/3.sce11
-rw-r--r--3669/CH6/EX6.4/4.sce13
-rw-r--r--3669/CH6/EX6.5/5.sce13
-rw-r--r--3669/CH6/EX6.6/6.sce16
-rw-r--r--3669/CH6/EX6.7/7.sce14
-rw-r--r--3669/CH6/EX6.8/8.sce18
-rw-r--r--3669/CH6/EX6.9/9.sce13
12 files changed, 166 insertions, 0 deletions
diff --git a/3669/CH6/EX6.1/1.sce b/3669/CH6/EX6.1/1.sce
new file mode 100644
index 000000000..6508af5d6
--- /dev/null
+++ b/3669/CH6/EX6.1/1.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+N=3*10**28; //number of atoms(per m**3)
+alpha_e=10**-40; //electronic polarizability(F m**2)
+epsilon0=8.85*10**-12;
+
+//Calculation
+epsilonr=(alpha_e*N/epsilon0)+1; //dielectric constant of material
+
+//Result
+printf('dielectric constant of material is %0.3f \n',(epsilonr)) \ No newline at end of file
diff --git a/3669/CH6/EX6.10/10.sce b/3669/CH6/EX6.10/10.sce
new file mode 100644
index 000000000..d3e278bb0
--- /dev/null
+++ b/3669/CH6/EX6.10/10.sce
@@ -0,0 +1,18 @@
+
+//Variable declaration
+N=3*10**25; //number of atoms(per m**3)
+r=0.2*10**-9; //radius(m)
+epsilon0=8.85*10**-12;
+E=1; //electric field
+
+//Calculation
+p=4*%pi*epsilon0*r**3; //dipole moment(F m**2)
+P=N*p; //polarization(C m)
+epsilonr=(P/(epsilon0*E))+1; //dielectric constant
+alpha_e=epsilon0*(epsilonr-1)/N; //polarizability(F m**2)
+
+//Result
+printf('dipole moment is %0.3f *10**-40 F m**2 \n',(p*10**40))
+printf('polarization is %0.3f *10**-15 C m \n',(P*10**15))
+printf('dielectric constant is %0.3f \n',(epsilonr))
+printf('polarizability is %0.3f *10**-40 F m**2 \n',(alpha_e*10**40)) \ No newline at end of file
diff --git a/3669/CH6/EX6.11/11.sce b/3669/CH6/EX6.11/11.sce
new file mode 100644
index 000000000..ab867ae05
--- /dev/null
+++ b/3669/CH6/EX6.11/11.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+epsilonr=1.000435; //dielectric constant of material
+N=2.7*10**25; //number of atoms(per m**3)
+
+//Calculation
+alpha_e=epsilon0*(epsilonr-1)/N; //electronic polarizability(F m**2)
+
+//Result
+printf('electronic polarizability is %0.3f *10**-40 F m**2 \n',(alpha_e*10**40)) \ No newline at end of file
diff --git a/3669/CH6/EX6.12/12.sce b/3669/CH6/EX6.12/12.sce
new file mode 100644
index 000000000..d4290c690
--- /dev/null
+++ b/3669/CH6/EX6.12/12.sce
@@ -0,0 +1,14 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+epsilonr=4; //dielectric constant
+D=2.08*10**3; //density(kg/m**3)
+Na=6.02*10**26; //avagadro number
+M=32; //atomic weight
+
+//Calculation
+N=Na*D/M; //number of atoms(per m**3)
+alphae=epsilon0*(epsilonr-1)/N; //atomic polarizability(F m**2)
+
+//Result
+printf('electronic polarizability is %0.3f *10**-40 F m**2 \n',(alphae*10**40)) \ No newline at end of file
diff --git a/3669/CH6/EX6.2/2.sce b/3669/CH6/EX6.2/2.sce
new file mode 100644
index 000000000..62f973eab
--- /dev/null
+++ b/3669/CH6/EX6.2/2.sce
@@ -0,0 +1,14 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+A=100*10**-4; //area(m**2)
+d=1*10**-2; //seperation(m)
+V=100; //potential(V)
+
+//Calculation
+C=epsilon0*A/d; //capacitance(F)
+Q=C*V; //charge on plates(C)
+
+//Result
+printf('capacitance is %e F \n',C)
+printf('charge on plates is %e C \n',Q)
diff --git a/3669/CH6/EX6.3/3.sce b/3669/CH6/EX6.3/3.sce
new file mode 100644
index 000000000..045187ea3
--- /dev/null
+++ b/3669/CH6/EX6.3/3.sce
@@ -0,0 +1,11 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+epsilonr=1.0000684; //dielectric constant of material
+N=2.7*10**25; //number of atoms(per m**3)
+
+//Calculation
+alpha_e=epsilon0*(epsilonr-1)/N; //electronic polarizability(F m**2)
+
+//Result
+printf('electronic polarizability is %e F m**2 \n',alpha_e)
diff --git a/3669/CH6/EX6.4/4.sce b/3669/CH6/EX6.4/4.sce
new file mode 100644
index 000000000..0b18a04e8
--- /dev/null
+++ b/3669/CH6/EX6.4/4.sce
@@ -0,0 +1,13 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+A=650*10**-6; //area(m**2)
+d=4*10**-3; //seperation(m)
+Q=2*10**-10; //charge(C)
+epsilonr=3.5;
+
+//Calculation
+V=Q*d/(epsilon0*epsilonr*A); //voltage(V)
+
+//Result
+printf('voltage is %0.3f V \n',(V)) \ No newline at end of file
diff --git a/3669/CH6/EX6.5/5.sce b/3669/CH6/EX6.5/5.sce
new file mode 100644
index 000000000..4a9931c6b
--- /dev/null
+++ b/3669/CH6/EX6.5/5.sce
@@ -0,0 +1,13 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+A=6.45*10**-4; //area(m**2)
+d=2*10**-3; //seperation(m)
+V=12; //voltage(V)
+epsilonr=5;
+
+//Calculation
+P=epsilon0*(epsilonr-1)*V/d; //polarization(C m)
+
+//Result
+printf('polarization is %0.3f *10**-9 C m \n',P*10**9) \ No newline at end of file
diff --git a/3669/CH6/EX6.6/6.sce b/3669/CH6/EX6.6/6.sce
new file mode 100644
index 000000000..a1de2752d
--- /dev/null
+++ b/3669/CH6/EX6.6/6.sce
@@ -0,0 +1,16 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+epsilonr=3.75; //dielectric constant
+gama=1/3; //internal field constant
+D=2050; //density(kg/m**3)
+Na=6.02*10**26; //avagadro number
+M=32; //atomic weight
+
+//Calculation
+N=Na*D/M; //number of atoms(per m**3)
+alphae=((epsilonr-1)/(epsilonr+2))*3*epsilon0/N; //electronic polarizability(F m**2)
+
+//Result
+printf('electronic polarizability is %0.3f *10**-40 F m**2 \n',(alphae*10**40))
+printf('answer varies due to approximating off errors\n') \ No newline at end of file
diff --git a/3669/CH6/EX6.7/7.sce b/3669/CH6/EX6.7/7.sce
new file mode 100644
index 000000000..7a90e9de7
--- /dev/null
+++ b/3669/CH6/EX6.7/7.sce
@@ -0,0 +1,14 @@
+
+//Variable declaration
+N=1.6*10**20; //number of molecules(/m**3)
+T=300; //temperature(K)
+E=5*10**5; //electric field(V/m)
+x=0.25*10**-9; //separation(m)
+Kb=1.381*10**-23; //boltzmann constant
+e=1.6*10**-19;
+
+//Calculation
+Pd=N*e**2*x**2*E/(3*Kb*T); //orientational polarization
+
+//Result
+printf('orientational polarization is %0.3f *10**-11 C m \n',(Pd*10**11)) \ No newline at end of file
diff --git a/3669/CH6/EX6.8/8.sce b/3669/CH6/EX6.8/8.sce
new file mode 100644
index 000000000..425310431
--- /dev/null
+++ b/3669/CH6/EX6.8/8.sce
@@ -0,0 +1,18 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+epsilonr=1.0000684; //dielectric constant of material
+N=2.7*10**25; //number of atoms(per m**3)
+E=10**6; //electric field(V/m)
+e=1.6*10**-19;
+Z=2; //atomic number
+
+//Calculation
+alpha_e=epsilon0*(epsilonr-1)/N; //electronic polarizability(F m**2)
+r=(alpha_e/(4*%pi*epsilon0))**(1/3); //radius(m)
+d=alpha_e*E/(Z*e); //displacement(m)
+
+//Result
+printf('radius is %0.3f *10**-11 m \n',(r*10**11))
+printf('answer varies due to approximating off errors\n')
+printf('displacement is %0.3f *10**-16 m \n',(d*10**16)) \ No newline at end of file
diff --git a/3669/CH6/EX6.9/9.sce b/3669/CH6/EX6.9/9.sce
new file mode 100644
index 000000000..bc4102984
--- /dev/null
+++ b/3669/CH6/EX6.9/9.sce
@@ -0,0 +1,13 @@
+
+//Variable declaration
+epsilon0=8.85*10**-12;
+A=750*10**-6; //area(m**2)
+d=5*10**-3; //seperation(m)
+Q=2.5*10**-10; //charge(C)
+epsilonr=3.5;
+
+//Calculation
+V=Q*d/(epsilon0*epsilonr*A); //voltage(V)
+
+//Result
+printf('voltage is %0.3f V \n',(V)) \ No newline at end of file
generated by cgit (git 2.34.1) at 2025-01-09 14:02:52 +0000