10 input A
20 input B
30 input C
40 let B1 = B/2
50 let D = 90
60 let C1 = C
70 gosub 370
80 let f = d
90 if c < 10 then XXX
100 let D = 180
110 let C1 = 10
120 gosub 390
130 let f1 = d
140 let D = 45
150 let C1 = 55
160 gosub 390
170 let f2 = d
180 if f1 > f then 200
190 let f = f1
200 if f2 > f then 220
210 let f = f2
220 let f = 100*f
230 let f = f + a
240 print f
250 stop
260 let D = 45
270 let C1 = 10
280 gosub 390
290 let f1 = d
300 let D = 180
310 let C1 = -80
320 gosub 390
330 let F2 = D
340 if f1 < f then 360
350 let f = f1
360 if f2 < f then 380
370 let f = f2
380 goto 220
390 let D = D * A
380 let D = D + B1
390 let D = D / B
400 let D = D + C1
410 ret