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

//Variable declaration
N=3*10**28;     //number of atoms(per m**3)
alpha_e=10**-40;    //electronic polarizability(F m**2)
epsilon0=8.85*10**-12;     

//Calculation
epsilonr=(alpha_e*N/epsilon0)+1;      //dielectric constant of material

//Result
printf('dielectric constant of material is %0.3f     \n',(epsilonr))