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

//Variable declaration
epsilon0=8.85*10**-12;
A=6.45*10**-4;     //area(m**2)
d=2*10**-3;     //seperation(m)
V=12;    //voltage(V)
epsilonr=5;

//Calculation
P=epsilon0*(epsilonr-1)*V/d;     //polarization(C m)

//Result
printf('polarization is %0.3f   *10**-9 C m  \n',P*10**9)