summaryrefslogtreecommitdiff
path: root/3718/CH1/EX1.9/Ex1_9.sce
blob: 9a90c7d0691e6cea7c8c0fc1a8bda571f61c2e09 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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)