diff options
Diffstat (limited to '1985/CH12/EX12.5')
| -rwxr-xr-x | 1985/CH12/EX12.5/Chapter12_example5.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/1985/CH12/EX12.5/Chapter12_example5.sce b/1985/CH12/EX12.5/Chapter12_example5.sce new file mode 100755 index 000000000..21bb3b3b4 --- /dev/null +++ b/1985/CH12/EX12.5/Chapter12_example5.sce @@ -0,0 +1,14 @@ +clc
+clear
+//Input data
+W=2.2//Work function of sodium in eV
+h=6.625*10^-34//Plancks constant in J.s
+c=3*10^8//Velocity of light in m/s
+e=1.6*10^-19//Charge of electron in Columbs
+
+//Calculations
+v=(W*e)/h//Frequency in Hz
+l=(c/v)/10^-10//The threshold wavelength in angstroms
+
+//Output
+printf('The threshold wavelength of the metal is %3.0f angstroms',l)
|