summaryrefslogtreecommitdiff
path: root/1427/CH34/EX34.14/34_14.sce
blob: d1577e171ce9b9336ec25131caf3ca3d4e7754fe (plain)
1
2
3
4
5
6
7
8
9
10
11
//ques-34.14
//Determining transmittance of a solution
clc
ratio1=100/80;//= Io/I1
ratio2=100/60;//= Io/I2
A1=log10(ratio1);
A2=log10(ratio2);
A=A1+A2;
//For, log10(tran) = A
tran=0.48;
printf("The percentage transmittance of the solution is %d.",tran*100);