1 files changed, 15 insertions, 0 deletions
diff --git a/3828/CH4/EX4.3/Ex4_3.sce b/3828/CH4/EX4.3/Ex4_3.sce
new file mode 100644
index 000000000..6142215ad
--- /dev/null
+++ b/3828/CH4/EX4.3/Ex4_3.sce
@@ -0,0 +1,15 @@
+//Chapter 4 : Laser and Holography
+
+clear;
+
+//Variable declaration
+lamda=6730*10**-18      //wavelength
+h=6.63*10**-34          //planck's constant
+c=3*10**8               //speed of light
+P=10**-3                //Power of laser
+
+//Calculations
+n=(P*lamda)/(h*c)/10**5
+
+//Result
+mprintf("Wavelength of radiation= %d*10**15 photons/sec",n)