summaryrefslogtreecommitdiff
path: root/3020/CH11/EX11.10/ex11_10.sce
blob: 37208b467a6315c3059e77bb310646455c4c514a (plain)
1
2
3
4
5
6
7
8
clc;
clear all;
c = 3e8; // Velocity of light in air
h = 6.626e-34 ; // Planck's constant
lambda = 4961e-10 ; // Wavelengh of green light from mercury lamp
E = (h*c)/lambda; // Energy of each photon emitted 
N = 1/E ; // Number of photons rquired to do one joule of work
disp('m^-3',N,'The number of photons from green light of mercury is')