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

//Variable declaration
epsilon0=8.85*10**-12;
epsilonr=1.000435;      //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 %0.3f   *10**-40 F m**2  \n',(alpha_e*10**40))