blob: fc11a5e4980a9767fcca73253732a0fa31de042f (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
// Scilab code Ex3.10 : Pg:113 (2008)
clc;clear;
omega1 = 0.02; // Dispersive power of the convex lens
omega2 = 0.04; // Dispersive power of the concave lens
f2 = -80; // Focakl length of the concave lens, cm
// As omega1/omega2 = -f1/f2, solving for f1
f1 = -omega1/omega2*f2; // Focal length of the crown glass convex lens, cm
printf("\nThe focal length of the crown glass convex lens = %2.0f cm", f1);
// Result
// The focal length of the crown glass convex lens = 40 cm
|