summaryrefslogtreecommitdiff
path: root/1301/CH18/EX18.2/ex18_2.sce
blob: 0a75396e53716d1e573bc8993ea07be4d8376105 (plain)
1
2
3
4
5
6
7
8
9
clc;
c=3*10^8;      //velocity in m/sec
l=5.5*10^-7;    //wavelength in m
f=c/l;          //calculating frequency
disp(f,"Frequency in Hz = ");    //displaying reuslt
h=6.63*10^-34;  //planck's constant in J.sec
E=h*f;         //calculating energy
disp(E,"Energy in Joule = ");    //displaying reuslt
disp((100/E),"No. of photons emitted per second = ");  //displaying result