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

clear
//Given
m=9*10**9// constant
q=1.6*10**-19// charge C
r=10**-10// distance m

//Calculation
U=m*q**2/r// potential energy
K=U/2.0// Kinetic energy

//Result
printf("\n Kinetic energy is  %e  J",K)