(import
  (scheme base)
  (scheme read)
  (scheme write)
)


(define yuki9010
  (let*
    (
      (n (read))
      (n-mod-400 (modulo n 400))
      (n-mod-100 (modulo n 100))
      (n-mod-4   (modulo n 4))
    )
    (display
      (cond
        ((zero? n-mod-400)
          "Yes\n"
        )
        ((zero? n-mod-100)
          "No\n"
        )
        ((zero? n-mod-4)
          "Yes\n"
        )
        (else
          "No\n"
        )
      )
    )
  )
)