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

//Variable declaration
lamda=6000*10**-8     //wavelength(cm)
Dm=0.65     //diameter of 8th ring(cm)
Dn=0.35     //changed diameter of 8th ring(cm)

//Calculation
R=(Dm**2-Dn**2)/(4*lamda)     //radius of curvature of lens(cm)

//Result
printf("\n radius of curvature of lens is %0.0f  cm",R)
printf("\n answer given in the book is wrong")