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

clear
//Given
p=2*10**-8// dipole moment coulomb-meter
m=9*10**9// constant
r=1.0// distance m

//Calculation
//
b=3*cos(60*3.14/180.0)**2+1
a=p*sqrt(b)
E=(m*a)/r**3// electric field intensity

//Result
printf("\n Magnitude of electric intensity is %0.1f  N/C",E)