(stdin.ReadLine ()).Split ' ' |> Array.map int |> fun (a:int[]) -> match System.Math.DivRem (a.[1], a.[0]) with | (q, 0) -> q.ToString() | (_, _) -> "NO" |> printfn "%s"