summaryrefslogtreecommitdiff
path: root/3769/CH16/EX16.9/Ex16_9.sce
blob: 98d9543059a084d3915c37b1ef251807b0ce6598 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear
//Given
f=-10.0                            //cm
u=-25.0                             //cm
h1=3

//Calculation
v=1/((1/f)-(1/u))
h2=(-v*h1)/u
A=h2**2

//Result
printf("\n Area enclosed by the image of the wire is %0.3f  cm**2", A)