1 files changed, 11 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