-- modules to import
import Control.Monad
import Data.Maybe
import qualified Data.ByteString.Char8 as DataByStrChr8



-- functions for input

read_Integer      = fst . fromJust . DataByStrChr8.readInteger
read_list_Integer = map read_Integer . DataByStrChr8.words

get_Integer      = read_Integer      <$> DataByStrChr8.getLine
get_list_Integer = read_list_Integer <$> DataByStrChr8.getLine



-- functions for ABC 064, Task A

calculate_target :: [Integer] -> Integer
calculate_target [red, green, blue] = 100 * red + 10 * green + blue

is_multiple :: Integer -> Integer -> Bool
is_multiple target base
	| mod target base == 0 = True
	| otherwise            = False



-- main process is below

main :: IO ()
main = do

	-- STEP.01
	-- read out the given integers
	[red, green, blue] <- get_list_Integer

	let target = calculate_target [red, green, blue]
	
	putStrLn $ if (is_multiple target 4) then "Yes" else "NO"

-- End of this source code