path: root/2708/CH2/EX2.18/ex_2_18.sce

//Example 2.18 // focal length of zone plate
clc;
clear;
//given data :
r=200;// radius of curvature in cm
f=r;//principal focal length in cm
disp(f,"principal focal length in cm")