//23.3
p=20//in cm
f=-8//in cm
x=(1/f)-(1/p)
q=1/x
p=25
M=-(q/p)
disp("part a")
disp(q,"The position of final image in cm=")
disp("part b")
disp(M,"The magnification=")