program main implicit none integer::N,M read *,N,M if(N.gt.M) then print '(i0)',-1 else print '(i0)',1 end if end program main