diff options
Diffstat (limited to '24/CH43/EX43.5/Example43_5.sce')
-rwxr-xr-x | 24/CH43/EX43.5/Example43_5.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/24/CH43/EX43.5/Example43_5.sce b/24/CH43/EX43.5/Example43_5.sce new file mode 100755 index 000000000..93c7272c8 --- /dev/null +++ b/24/CH43/EX43.5/Example43_5.sce @@ -0,0 +1,13 @@ +//Given that
+M = 2.71 //in g
+R = 4490 //in Bq
+fraction = 1.17/100
+Mo = 74.555 //gm/mol
+Na = 6.023*10^23 //n /mol
+
+//Sample Problem 43-5
+txt = mopen('Example43_5_result.txt','wt')
+mfprintf(txt, '**Sample Problem 43-5**\n')
+Nk = Na * M * fraction/Mo
+Th = log(2)*Nk/R
+mfprintf(txt, 'The half life of the substance is %eSec', Th)
\ No newline at end of file |