summaryrefslogtreecommitdiff
path: root/3769/CH25/EX25.12/Ex25_12.sce
blob: 9585c0e1c822ed3a7695226488eb119ac906cc9c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear
//Given
t=5000                   //Days
t1=2000.0
a=0.693 

//Calculation
//
dt=(a*t)/t1
N=log10(dt)
l=a*N/(t1)

//Result
printf("\n (i) The fraction remaining after 5000 days is %0.3f  ",N)
printf("\n (ii) The activity of sample after 5000 days is %0.1f  *10**8 Bq",l*10**5)