1 files changed, 10 insertions, 0 deletions
diff --git a/1004/CH2/EX2.4/Ch02Ex4.sci b/1004/CH2/EX2.4/Ch02Ex4.sci
new file mode 100755
index 000000000..50e5ed53e
--- /dev/null
+++ b/1004/CH2/EX2.4/Ch02Ex4.sci
@@ -0,0 +1,10 @@
+// Scilab Code Ex2.4 Longest wavelength of incident radiation: Pg:45 (2008)
+h = 6.624e-034;    // Planck's constant, Js
+c = 3e+08;    // Speed of light, m/s
+e = 1.6e-019;    // Energy equivalent of 1 eV, joule/eV
+phi = 6*e;       // Work function of metal, joule
+f0 = phi/h;    // Threshold frequency for metal surface, Hz
+L0 = c/f0;     // Threshold (Longest) wavelength for metal, m
+printf("\nThe longest wavelength of incident radiation = %4d angstrom", L0/1e-010);
+// Result 
+// The longest wavelength of incident radiation = 2070 angstrom 
+\ No newline at end of file