main = getContents >>= print . solve . map read . lines

solve :: [Int] -> Int
solve [l, m, n] = mod y 10 + a + b
        where
        (a, x) = (mod n 25, div n 25 + m)
        (b, y) = (mod x 4, div x 4 + l)