1 files changed, 10 insertions, 0 deletions
diff --git a/3363/CH2/EX2.3/EX2_3.sce b/3363/CH2/EX2.3/EX2_3.sce
new file mode 100755
index 000000000..eb84e93e8
--- /dev/null
+++ b/3363/CH2/EX2.3/EX2_3.sce
@@ -0,0 +1,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)
+\ No newline at end of file