judge :: Bool -> (String,String) -> String
judge f (ts,fs) = case f of
  True -> ts
  False -> fs
 
isMultipleOf4 :: Int -> Int -> Bool
isMultipleOf4 x y = ((flip mod 4) $ x * 10 + y) == 0
 
main = do
  line <- getLine
  let 
    [_,g,b] = map read $ words line :: [Int]
    ret = isMultipleOf4 g b
  putStrLn $ judge ret ("YES","NO")
