main :: IO ()
main = do
    input <- getContents
    let a:b:c:_ = map read (words input)
        b1 = b + (c `div` 25)
        c1 = c `mod` 25
        a1 = a + (b1 `div` 4)
        b2 = b1 `mod` 4
    print ((a1 `mod` 10) + b2 + c1)