summaryrefslogtreecommitdiff
path: root/1385/CH20/EX20.1/20_1.sce
blob: 1150572c1db276ee871520cdbef3c3f3eca8f898 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc
//initialisation of variables
t= 4.5*10^9 //years
t1= 1590 //years
//CALCULATIONS
l= log10(2)/(t*0.4343)
l1= log10(2)/(t1*0.4343)
r= l1/l
r1= t/t1
//RESULTS
printf (' disintegration constant= %.2e yr^-1',l)
printf (' \n disintegration constant= %.2e yr^-1',l1)
printf (' \n relative proportion= %.2e ',r)
printf (' \n relative proportion= %.2e ',r1)