solve :: [Int] -> Int
solve [a,b]
    | a <= 23 && b >= 25            = 0
    | b < 23 || a > 25              = 3
    | a == 25 || b == 23 || a == b  = 2
    | otherwise                     = 1

main = getLine >>= print . solve . map read . words