summaryrefslogtreecommitdiff
path: root/3840/CH6/EX6.3/Ex6_3.sce
blob: 1c4c582fe05be21fd960bf606be27972db33e90b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear
//
//
//

//Variable declaration
epsilonr=1.0000684     //dielectric constant
N=2.7*10**25   //number of atoms
epsilon0=8.85*10**-12    

//Calculation
alpha_e=epsilon0*(epsilonr-1)/N    //polarisability(Fm**2)

//Result
printf("\n polarisability is %e  Fm**2",alpha_e)