summaryrefslogtreecommitdiff
path: root/3755/CH10/EX10.16/Ex10_16.sce
diff options
context:
space:
mode:
Diffstat (limited to '3755/CH10/EX10.16/Ex10_16.sce')
-rw-r--r--3755/CH10/EX10.16/Ex10_16.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3755/CH10/EX10.16/Ex10_16.sce b/3755/CH10/EX10.16/Ex10_16.sce
new file mode 100644
index 000000000..da25ebeb8
--- /dev/null
+++ b/3755/CH10/EX10.16/Ex10_16.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+epsilon0=8.85*10^-12; //dielectric constant
+Na=6.02*10^26; //number of atoms
+epsilonr=3.75; //dielectric constant
+M=32; //atomic mass
+rho=2050; //density(kg/m^3)
+gama=1/3; //internal field constant
+
+//Calculations
+N=Na*rho/M; //number of atoms
+alphae=((epsilonr-1)/(epsilonr+2))*(3*epsilon0/N); //electronic polarizability(Fm^2)
+
+//Result
+printf("\n electronic polarizability is %0.2f *10^-40 Fm^2",alphae*10^40)