isKadomatsu :: Integer -> Integer -> Integer -> Bool isKadomatsu a b c = (a /= b && b /= c && a /= c) && (b == max || b == min) where max = maximum [a,b,c]; min = minimum [a,b,c]; main = do [a1, a2, a3] <- getLine >>= return . map (read::String->Integer) . words putStrLn $ if a1 == a2 || a2 == a3 || a1 == a3 then "0" else if isKadomatsu a1 a2 a3 then "INF" else show $ sum[1|p<-[1..maximum[a1,a2,a3]], isKadomatsu (mod a1 p) (mod a2 p) (mod a3 p)]