1 files changed, 14 insertions, 0 deletions
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