diff options
Diffstat (limited to '3840/CH6/EX6.12/Ex6_12.sce')
| -rw-r--r-- | 3840/CH6/EX6.12/Ex6_12.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3840/CH6/EX6.12/Ex6_12.sce b/3840/CH6/EX6.12/Ex6_12.sce new file mode 100644 index 000000000..4b8c2866b --- /dev/null +++ b/3840/CH6/EX6.12/Ex6_12.sce @@ -0,0 +1,17 @@ +clear +// +// +// + +//Variable declaration +epsilon0=8.85*10**-12 +epsilonr=4 //dielectric constant +NA=6.02*10**26 //avagadro number +D=2.08*10**3 //density(kg/m**3) +M=32 //atomic weight(kg) + +//Calculation +N=NA*D/M //number of atoms +alphae=epsilon0*(epsilonr-1)/N //polarisability(Fm**2) + +//Result |