summaryrefslogtreecommitdiff
path: root/3769/CH2/EX2.15/Ex2_15.sce
blob: 74800b7b6268cee2598aefde55b62a8c183671e3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14

clear
//Given
q=2*10**-6// charge C
a=0.1// dipole length m
m=9*10**9// constant
r=0.5// distance m

//Calculation
p=q*a // finding potential
E=m*p/r**3// electric field intensity

//Result
printf("\n Electric field intensity is  %0.3f  *10**4 N/C",E*10**-4)