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

//Variable declaration
lamda=5890*10**-8     //wavelength(cm)
Dm=0.590     //diameter of 8th ring(cm)
Dn=0.336     //changed diameter of 8th ring(cm)
m=15
n=5

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

//Result
printf("\n radius of curvature of lens is %0.1f  cm",R)