gcds :: Integral a => [a] -> a
gcds (x : y : []) = gcd x y
gcds (x : xs) = gcd x $ gcds xs
 
main :: IO ()
main = getLine >> getContents >>= print . (100 `div`) . gcds . map read . lines