WolframAlpha computational knowledge AI
Sum[(-1)^r (Binomial[n, r]/(r + 1)), {r, 0, n}]