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

//Variable declaration
D10=0.5*10**-2       //diameter of 10th ring(m)
n=10
lamda=5900*10**-10   //wavelength(m)

//Calculation
R=D10**2/(4*n*lamda)      //radius of curvature of lens(m)

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