summaryrefslogtreecommitdiff
path: root/3769/CH2/EX2.17/Ex2_17.sce
blob: c98cea389f25247797cc4ec63877580432d4ff1c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clear
//Given
p=2*10**-8
m=9*10**9
r=1.0

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

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