summaryrefslogtreecommitdiff
path: root/3869/CH1/EX1.47/Ex1_47.sce
blob: 66f69f4eb72132c8bd586d95df3f6cb30093bd3e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clear
//
//
//

//Variable declaration
lamda=5000*10**-8     //wavelength(cm)
mew=1.5     //refractive index
beta1=1      //assume
S=6*beta1

//Calculation
t=S*lamda/(beta1*(mew-1))          //least thickness of glass plate(cm)

//Result
printf("\n least thickness of glass plate is %0.0f  *10**-4 cm",t*10**4)