summaryrefslogtreecommitdiff
path: root/1385/CH17/EX17.1/17_1.sce
blob: 4c693ced3216eaea1865557737b4795f20a6f323 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc
//initialisation of variables
t= 40 //min
r= 0.274
t1= 50 //min
//CALCULATIONS
k= 2.3*log10(1/(1-r))/t
R=10^( -k*t1/2.3)
R1= 1-R
//RESULTS
printf (' velocity constant= %.4f min^-1',k)
printf (' \n fraction decomposed= %.3f ',R1)