summaryrefslogtreecommitdiff
path: root/3769/CH3/EX3.13/Ex3_13.sce
blob: 6ddd0e6828a4d4f8287554c81cb34b07a8c8be8a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14

clear
//Given
m=9*10**-9// constant
q1=3*10**-9// charge q1
q2=3*10**-9// charge q2
q3=10**9// charge q3
r=0.2// side length of triangle

//Calculation
W=m*((q1*q3/r)+(q2*q3/r))// work done

//Result
printf("\n Workdone is  %e  J", W)