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

//Variable declaration    
k=4;
epsilon0=9*10^-12;        //relative permeability(F/m)
E=10^6;         //electric field(V/m)

//Calculations
D=k*epsilon0*E;     //electric displacement(C/m^2)
P=epsilon0*E*(k-1);      //polarisation(C/m^2)

//Result
printf("\n electric displacement is %0.0f *10^-6 C/m^2",D*10^6)
printf("\n polarisation is %0.0f *10^-6 C/m^2",P*10^6)