diff options
Diffstat (limited to '1026/CH13/EX13.6/Example13_6.sce')
-rwxr-xr-x | 1026/CH13/EX13.6/Example13_6.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1026/CH13/EX13.6/Example13_6.sce b/1026/CH13/EX13.6/Example13_6.sce new file mode 100755 index 000000000..7344e27e3 --- /dev/null +++ b/1026/CH13/EX13.6/Example13_6.sce @@ -0,0 +1,15 @@ +//chapter13,Example13_6,pg 393
+
+M7Li3=7.01818
+
+M1H1=1.0081
+
+M1n0=1.009
+
+BEpernu=(1/7)*((3*M1H1)+(4*M1n0)-M7Li3)//binding energy per nucleon
+
+BEpernu=BEpernu*931//converting in Mev
+
+printf("binding energy per nucleon\n")
+
+printf("BE=%.2f Mev",BEpernu)
\ No newline at end of file |