diff options
Diffstat (limited to '3769/CH25/EX25.13/Ex25_13.sce')
-rw-r--r-- | 3769/CH25/EX25.13/Ex25_13.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3769/CH25/EX25.13/Ex25_13.sce b/3769/CH25/EX25.13/Ex25_13.sce new file mode 100644 index 000000000..141ecabb5 --- /dev/null +++ b/3769/CH25/EX25.13/Ex25_13.sce @@ -0,0 +1,14 @@ +clear +//Given +N=3.67*10**10 //dis/second +r=226.0 +A=6.023*10**23 + +//Calculation +n=A/r +l=N/n +D=0.693/l +a=D/(3600.0*24.0*365.0) + +//Result +printf("\n Half life of radium is %0.0f years",a) |