blob: eb84e93e82a497647ff0628b70adffcc9e5106ac (
plain)
1
2
3
4
5
6
7
8
9
10
|
//Example 2.3, Page no 50
p=1//j/s
r=1//radius in m
h=6.63*10^-34//Joule-sec
c=3*10^8//m/sec
lambda=5.89*10^-7//m
R=p/(4*%pi*r^2)
E=(h*c)/lambda
Rate_R=R*(1/E)
printf("\nRate at which photons strike unit area of place %e photons/m^2-sec",Rate_R)
|