summaryrefslogtreecommitdiff
path: root/1026/CH9/EX9.4/Example9_4.sce
blob: 03f3ba71fece265c869e0fb47fe6605ef5db0709 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//chapter9,Example9_4,pg 238

d=2.81*10^-10

theta=14*(%pi/180)//glancing angle

lam=2*d*sin(theta)//min. wavelength

e=1.6*10^-19

V=9100

c=3*10^8

h=(lam*e*V)/c

printf("plancks constant\n")

disp(h)