summaryrefslogtreecommitdiff
path: root/3769/CH3/EX3.13/Ex3_13.sce
blob: 69fce57d1c0a682d9eef89475e3ea1ddf7fc8c94 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear
//Given
m=9*10**-9
q1=3*10**-9
q2=3*10**-9
q3=10**9
r=0.2

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

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