open System

let ri () = stdin.ReadLine() |> int
let ria () = stdin.ReadLine().Split() |> Array.map int

type Sol() =
    member this.Solve() = 
        
        let rec gcd a b = if a = 0 then b else gcd (b%a) a
        let x = 1234
        let y = 4567
        let z = gcd x y
        printfn "0"
        
        
let mySol = new Sol()
mySol.Solve()