1 files changed, 13 insertions, 0 deletions
diff --git a/2411/CH5/EX5.4/Ex5_4.sce b/2411/CH5/EX5.4/Ex5_4.sce
new file mode 100755
index 000000000..e63354552
--- /dev/null
+++ b/2411/CH5/EX5.4/Ex5_4.sce
@@ -0,0 +1,13 @@
+// Scilab Code Ex5.4: Page-285 (2008)
+clc; clear;
+h = 6.62e-034;    // Planck's constant, Js
+c = 3e+008;    // Speed of light, m/s
+lambda = 2300e-010;    // Thereshold wavelength for tungsten, m
+phi = h*c/lambda;    // Work function for tungsten, J
+lambda = 1800e-010;    // Wavelength of incident radiation, m
+E = h*c/lambda;    // Energy of the incidnt radiation, J
+KE = E - phi;    // Kinetic energy of the ejected photoelectrons, J
+printf("\nThe kinetic energy of the ejected photoelectrons = %3.1f eV", KE/1.6e-019);
+
+// Result
+// The kinetic energy of the ejected photoelectrons = 1.5 eV 
+\ No newline at end of file