summaryrefslogtreecommitdiff
path: root/1271/CH9/EX9.5
diff options
context:
space:
mode:
Diffstat (limited to '1271/CH9/EX9.5')
-rwxr-xr-x1271/CH9/EX9.5/5.txt1
-rwxr-xr-x1271/CH9/EX9.5/example9_5.sce14
2 files changed, 15 insertions, 0 deletions
diff --git a/1271/CH9/EX9.5/5.txt b/1271/CH9/EX9.5/5.txt
new file mode 100755
index 000000000..bb351fed9
--- /dev/null
+++ b/1271/CH9/EX9.5/5.txt
@@ -0,0 +1 @@
+ Induce dipole moment of each is 7.306870e-36 C-m \ No newline at end of file
diff --git a/1271/CH9/EX9.5/example9_5.sce b/1271/CH9/EX9.5/example9_5.sce
new file mode 100755
index 000000000..323711c2a
--- /dev/null
+++ b/1271/CH9/EX9.5/example9_5.sce
@@ -0,0 +1,14 @@
+clc
+// Given that
+E = 3e4 // external field in V/m
+k = 1.00074 // dielectric constant of gas at N.T.P.
+e_ = 8.85e-12 // electric permittivity of air in C^2/Nm^2
+// Sample Problem 5 on page no. 9.12
+printf("\n # PROBLEM 5 # \n")
+printf(" Standard formula used \n")
+printf(" P=x*e_*E.\n\n ")
+x = k-1
+P = x*e_*E
+N = 6.023e23/22.4e-3
+p = P/N
+printf("Induce dipole moment of each is %e C-m",p)