blob: 219c8136089bc4c06a8c0c3bdadb56fbf4f25e59 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
//Example 1_50
clc();
clear;
//To find the radius of curvature of the plano convex lens
lamda=6000 //units in angstroam
lamda=6000*10^-8 //units in cm
m=18
Dm=0.65 //units in cm
n=8
Dn=0.35 //units in cm
R=(Dm^2-Dn^2)/(4*lamda*(m-n))
printf("Radius of curvature of the plano convex lens is %.0f cm",R)
|
