open System let ri () = stdin.ReadLine() |> int let ria () = stdin.ReadLine().Split() |> Array.map int let N = ri () let rec gcd (a:int64) (b:int64) = match a with | _ when a>b -> gcd b a | 0L -> b | _ -> gcd (b%a) a let x = 1234L let y = 4567L let z = gcd x y printfn "0"