main :: IO ()
main = interact $ show . solve . map read . words

solve :: [Int] -> Int
solve [l, m, n] = r + u + x
    where
        r = n `mod` 25
        s = n `div` 25
        t = m + s
        u = t `mod` 4
        v = t `div` 4
        w = l + v
        x = w `mod` 10
        y = w `div` 10