diff options
Diffstat (limited to '3755/CH10/EX10.15/Ex10_15.sce')
| -rw-r--r-- | 3755/CH10/EX10.15/Ex10_15.sce | 18 |
1 files changed, 18 insertions, 0 deletions
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)
|