main = do
  k <- readLn
  [a, b] <- (map read . words) <$> getLine
  let modList = [x | x <- [a..b], x `mod` k == 0]
  let ans = if (0 < length modList)
            then "OK"
            else "NG"
  putStrLn ans