func main()
	var n: int :: cui@inputInt()
	var k: int :: cui@inputInt()
	var ans: int :: 0
	
	do ans :: [n / (2 - n % 2), k + 1 + (k + 1) % 2].min()
	do cui@print("\{ans}\n")
end func