blob: bc2cdc30b8b7b424edbd7e2aba435bbdc2d11eb5 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
//Given that
M_U = 235.0439 //in Atomic mass unit
M_Ce = 139.9054 //in Atomic mass unit
M_Zr = 93.9063 //in Atomic mass unit
M_n = 1.00867 //in Atomic mass unit
uCsqure = 931.5 //in Mev
//Sample Problem 44-1
txt = mopen('Example44_1_result.txt','wt')
mfprintf(txt, '**Sample Problem 44-1**\n')
Q = -((M_Ce + M_Zr + M_n) - M_U) * uCsqure
mfprintf(txt, 'The disintegration energy is %dMev', Q)
mclose(txt)
|
