summaryrefslogtreecommitdiff
path: root/3020/CH11/EX11.7/ex11_7.sce
blob: bcb4a5a65c13068fa8e53d74feab00b994644f26 (plain)
1
2
3
4
5
6
7
8
9
10
clc;
clear all;
c = 3e8; // Velocity of light in air
h = 6.626e-34 ; // Planck's constant
lambda = 0.4e-6 ; // Wavelengh of cadmium sulphate crystal in meters
E = (h*c)/lambda; // Energy of each photon emitted 
a = 4e-6; // Area of photodetector in square meters
I = 200; // Intensity of light in watts/square meters
N = (I*a)/E;// The number of pairs generated per second
disp('',N,'The number of pairs generated per second is')