summaryrefslogtreecommitdiff
path: root/3363/CH15/EX15.4/Ex15_4.sce
blob: 6aa45efd3727b7275ed7f86a12c2884eed0a69e0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example 15.4, Page 540
clc
kb=4.44//in Mev
ka=7.70//in Mev
mb=1
mB=17
ma=4
Q=(kb*(1+(mb/mB)))-(ka*(1-(ma/mB)))
disp('Part a')
printf("\n The value of Q is %f  Mev",Q)
c=3*10^8//m/s
m=Q/(931.5)
printf("\n The atomic mass of Q is %e  u",m)