1 files changed, 19 insertions, 0 deletions
diff --git a/3718/CH1/EX1.17/Ex1_17.sce b/3718/CH1/EX1.17/Ex1_17.sce
new file mode 100644
index 000000000..654b779b9
--- /dev/null
+++ b/3718/CH1/EX1.17/Ex1_17.sce
@@ -0,0 +1,19 @@
+//Chapter 1: Structure and Bonding
+//Problem: 17
+clc;
+
+//Declaration of Constants
+m = 9.1 * 10 ** -31             // Mass of electron, kg
+h = 6.626 * 10 ** -34           // Plank's constant, J.sec
+c = 3 * 10 ** 8                 // Speed of light, m/sec
+
+// Variables
+v = 6.46 * 10 ** 5              // Velocity of electron, m/sec
+lamda = 200 * 10 ** -9          // Wavelength of light, m
+
+// Solution
+E = (h * c) / lamda
+ke = m * v ** 2
+w = E - ke
+
+mprintf("The Workfunction of the metal surface is %.3e J",w)