summaryrefslogtreecommitdiff
path: root/3718/CH1/EX1.9/Ex1_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3718/CH1/EX1.9/Ex1_9.sce')
-rw-r--r--3718/CH1/EX1.9/Ex1_9.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3718/CH1/EX1.9/Ex1_9.sce b/3718/CH1/EX1.9/Ex1_9.sce
new file mode 100644
index 000000000..9a90c7d06
--- /dev/null
+++ b/3718/CH1/EX1.9/Ex1_9.sce
@@ -0,0 +1,15 @@
+//Chapter 1: Structure and Bonding
+//Problem: 9
+clc;
+
+//Declaration of Constants
+c = 3 * 10 ** 8 // Speed of light, m/sec
+h = 6.626 * 10 ** -34 // Plank's constant, J.sec
+
+// Variable
+lamda = 650 * 10 ** -12 // Wavelength of radiation, m
+
+// Solution
+E = h * c / lamda
+
+mprintf("Energy per photon :%.3e J",E)