diff options
Diffstat (limited to '509/CH7/EX7.2/7_2.sci')
| -rw-r--r-- | 509/CH7/EX7.2/7_2.sci | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/509/CH7/EX7.2/7_2.sci b/509/CH7/EX7.2/7_2.sci new file mode 100644 index 000000000..6fb1a1bc2 --- /dev/null +++ b/509/CH7/EX7.2/7_2.sci @@ -0,0 +1,19 @@ +//Chapter 7 Example2//
+clc
+clear
+//half life of radium=hl,decay constant of radium sample=l//
+l=1.3566*10^-11// in s^-1//
+hl=0.6931/l;
+printf("\n Half life = %.3f sec\n",hl);
+// to convert half life in years divide by 365*24*60*60//
+hl1=hl/(365*24*60*60);
+printf("\n Half life in years = %.2f years\n",hl1);
+// number of atoms per gram =n,avagadro number=a,atomic mass=m//
+A=6.023*10^23;
+m=226.095;
+n=A/m;
+// initial activity =a//
+a=l*n;
+printf("\n Initial activity in radium = %.2f disintigration/sec\n",a);
+
+
|