module Main where

    import Debug.Trace
    import Data.List
    
    solve :: Int -> Int -> Int -> Int -> Int -> String
    solve w h x y r = if x + r <=w && x - r >= 0 && y + r <=h && y - r >= 0
                        then "Yes" else "No"  
       
    readLine:: IO [Int]
    readLine = fmap (map read . words) getLine
    
    main :: IO() 
    main = do
        [w, h, x, y, r] <- readLine
        let ans = solve w h x y r
        putStrLn ans
    
