clc
//to calculate resolving power of microscope
NA=0.12 //numerical aperture
lambda=6*10^-5 //wavelength of light in cm
RP=2*NA/lambda //RP=resolving power
disp("the resolving power of microscope is RP="+string(RP)+"unitless")