summaryrefslogtreecommitdiff
path: root/3755/CH10/EX10.8/Ex10_8.sce
blob: 8191302c8eec248a19c9c7654df836d5396d4ab3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clear
//
//
//

//Variable declaration    
epsilon0=8.85*10^-12;        //relative permeability(F/m)
E=100;               //electric field(N/C)
epsilonr=1.000074;   //dielectric constant
n=2.68*10^27;      //density

//Calculations
p=epsilon0*E*(epsilonr-1)/n;    //dipole moment(coul-metre)

//Result
printf("\n dipole moment is %0.4f *10^-41 C/m^2",p*10^41)
printf("\n answer in the book is wrong")