1 files changed, 15 insertions, 0 deletions
diff --git a/273/CH15/EX15.4/ex15_4.sce b/273/CH15/EX15.4/ex15_4.sce
new file mode 100755
index 000000000..59a8ebbba
--- /dev/null
+++ b/273/CH15/EX15.4/ex15_4.sce
@@ -0,0 +1,15 @@
+clc;clear;
+//Example 15.4
+//calculation of amount of unchanged material
+
+//given values
+T=2;//half life in years
+k=.6931/T;//decay constant
+M=4.0028;//mass of Helium nucleus in amu
+amu=931.4;//amu in MeV
+No=1;//initial amount in g
+
+//calculation
+N=No*(%e^(-k*2*T));
+disp(N,'amount of material remaining unchanged after four years(in gram) is');
+