summaryrefslogtreecommitdiff
path: root/2855/CH1/EX1.8/Ex1_8.sce
blob: 13206aed4f23c5feb034127f16dc98a5f2f1edba (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18





//Ex1_8
//given 
//page no 12
clc;
clear;
//k=aa+as=6.3;
//Given values from research
k=6.3;      //combined attenuation due to absorption and scattering
d=25;       //in cm
disp('Solution (ii)');
//Io/Ii=exp(-(ao+ai)*d);  d in m
j=exp(-(k)*d/100);  //Io/Ii ratio
printf("\n  Io is %0.3f of Ii \n",j);       //result