summaryrefslogtreecommitdiff
path: root/2465/CH3/EX3.1/Example_1.sce
blob: 093b57b8d23122d2ae65c8ed766d809735e72439 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

//Chapter-3,Example 1,Page 56
clc;
close;

M_0=200  //mass of radium

total_time= 8378-1898   //in years

//since t-half for radium is 1620 years

t_half=6480/1620  // number of half lives

m_left=M_0*(1/2)^t_half   //mass of radium left

printf('mass of radium left after 6480 years is %.1f mg',m_left)