program main implicit none integer*8::AX,AY integer*8::lm,um print '("-1 -1")' read *, lm print '("100001 -1")' read *, um AX = (lm-um)/2+50000 print '("-1 100001")' read *, um AY = (lm-um)/2+50000 print '(i0," ",i0)',AX,AY end program main