program main
    implicit none
    
    integer(16) :: n
    
    read *, n
    print '(I0)', merge(1, -1, (mod(n-2, 2) == 1) .or. (mod(n-7, 4) == 1))
end program main