summaryrefslogtreecommitdiff
path: root/3718/CH1/EX1.17/Ex1_17.sce
blob: 654b779b9fa9e32a62777a0e4eb5a0081743c886 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
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)