summaryrefslogtreecommitdiff
path: root/2300/CH23/EX23.31.1/Ex23_1.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2300/CH23/EX23.31.1/Ex23_1.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2300/CH23/EX23.31.1/Ex23_1.sce')
-rwxr-xr-x2300/CH23/EX23.31.1/Ex23_1.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/2300/CH23/EX23.31.1/Ex23_1.sce b/2300/CH23/EX23.31.1/Ex23_1.sce
new file mode 100755
index 000000000..6cdd8afb4
--- /dev/null
+++ b/2300/CH23/EX23.31.1/Ex23_1.sce
@@ -0,0 +1,16 @@
+//scilab 5.4.1
+//Windows 7 operating system
+//chapter 23 Lasers,Fibre Optics,and Holography
+clc
+clear
+y=630*10^(-9)//y=emitted wavelength in meters
+c=3*10^8//c=velocity of light in free space in m/s
+v=c/y//v=frequency of the emitted radiation
+format("v",9)
+disp("The frequency of the emitted radiation is")
+disp("Hz",v,"v=")
+h=6.62*10^(-34)//h=Planck's constant
+P=1*10^(-3)//P=output power of gas laser(given)
+n=P/(h*v)
+format("v",9)
+disp("s^-1",n,"The number of photons emitted per second is=")