summaryrefslogtreecommitdiff
path: root/3669/CH6/EX6.3/3.sce
blob: 045187ea3184f8d04ce23d8f1d78e9e61ff90321 (plain)
1
2
3
4
5
6
7
8
9
10
11

//Variable declaration
epsilon0=8.85*10**-12;
epsilonr=1.0000684;      //dielectric constant of material
N=2.7*10**25;    //number of atoms(per m**3)

//Calculation
alpha_e=epsilon0*(epsilonr-1)/N;     //electronic polarizability(F m**2)

//Result
printf('electronic polarizability is %e  F m**2   \n',alpha_e)