summaryrefslogtreecommitdiff
path: root/3869/CH1/EX1.18/Ex1_18.sce
blob: 09726848a7c1bbd436e0af0bce0f0ba5c69abc92 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clear
//
//
//

//Variable declaration
mew=1.5          //refractive index
lamda=5890*10**-10    //wavelength(m)
r=60*%pi/180      //angle of reflection(radian)

//Calculation
t=lamda/(2*mew*cos(r))       //smallest thickness of the plate(m)

//Result
printf("\n smallest thickness of the plate is %0.0f  angstrom",t*10**10)