disp("It=I0*exp(-α*l)");
a=5*10^4;  //say α=a
l=0.46*10^-4;
I0=10^-2;
It=I0*exp(-a*l);
printf('\n The value of It is %f W',It);
p1=10;
p2=1;
Pab=p1-p2;
printf('\n The value of Pab is %f mW(or)*10^-3J/s',Pab);