The probabilities are calculated to a high degree of accuracy in "The Asymptotics of Group Russian Roulette," by Tim Van De Brug, Wouter Kager, and Ronald Meester. If you download the paper, you also get the Mathematica notebook that produced the calculations, and the results. Also, there's a PDF file which I take to be a transcription of the notebook, so you can follow it even if you don't have Mathematica.
The paper shows that the probabilities are, in the limit, periodic with period one, on the log scale, that is, they depend only on the fractional part of the natural logarithm of $n$. The authors calculate the probabilities up to $n=6,000$ to a high degree of accuracy. These are needed for the analysis of the asymptotic behavior, but here I'll only discuss the calculation of the probabilities.
Let $P(n,k)$ be the probability that there are exactly $k$ survivors after one round of shooting, starting with $n$ shooters. Then by the principle of inclusion and exclusion, $$P(n,k)=\binom{n}{k}(n-1)^{-n} \Sigma_{0 \le r \le n-k-2}(-1)^r\binom{n-k}{r}(n-k-r)^{k+r}(n-k-r-1)^{n-k-r}$$
(I'm not much good at MathJax, and I hope someone will format this equation better.) Anyway, to explain it, we get the same probability for any $k$ survivors we choose, and each probability is a fraction with denominator $n-1$, which explains the two factors outside the sum. Now if there are $k$ survivors, there are $n-k$ "targets," or persons who may be shot at. So at first glance we have $(n-k)^k(n-k-1)^{n-k}$ possibilities, since the survivors can shoot at any of the targets, and and each target can shoot at any target but himself. This gives the $r=0$ term in the sum.
But just because a person is a potential target, he doesn't necessarily get shot. If no one shoots at a particular target, we would have $k+1$ survivors, not $k$, and we must subtract those possibilities. That accounts for the $r=1$ term. However, suppose two targets aren't shot at. Then we have subtracted that event twice, once for each of them, and we only want to subtract it once, so we must add it back in. This gives the $r=2$ term, and so on. It isn't possible to have $n-1$ survivors (if everyone shoots the same person, who does he shoot?) which accounts for the upper limit on $r$.
By the Bonferroni inequalities, the partial sums in the inclusion-exclusion formula alternately overstate and understate the answer, and the error has the same sign as the first omitted term, and does not exceed it in magnitude. Since the authors are looking for a lower bound on $S(n,k)$, they quit computing after an even number of terms, once the next term is small enough. (Of course, "small enough" must take into account the factors outside the sum.)
Now let $p_n$ be the probability that we end with one survivor, if we start with $n$ persons. Then $$p_n=\Sigma_{0 \le k \le n-2}P(n,k)p_k$$
and $p_0=0, p_1=1, p_2 = 0$. Of course, we would get an exactly analogous formula if $p'_n$ were defined as the probability of ending with no survivors, but the initial values would be different. In that case, we would have $p'_0=1, p'_1=0, p'_2 = 1$. The authors compute lower bounds for both cases. Then complementing the lower bound on $p'_n$ gives an upper bound on $p_n$.
It seems odd to compute two lower bounds, since the Bonferroni inequalities seem to give upper bounds with little additional work, but here we get to the most interesting part of the calculation. Let $$k1 = max(0, \frac{n}{e} - \sqrt{5n}),$$ $$k2 = min(n-2, \frac{n}{e} + \sqrt{5n})$$ Then the authors show that $$\Sigma_{k_1 \le k \le k_2}P(n,k)p_k$$ is a very good approximation to $p_n$ and it is certainly a lower bound, provided that the computed $P(n,k)$ values are lower bounds on the true values.
Of course, the proof of the pudding is in the results. Comparing the upper and lower bounds computed up to $n=6,000$ shows that they agree to seven decimal places in all cases.
A Hint at the Theory
To arrive at the tail bound above, the authors first use a coupling to show that the distribution of the number of survivors after one round of shooting is closely approximated by the number of boxes remaining empty after $n-1$ balls are randomly thrown into $n-1$ boxes. The latter random variable is much simpler to analyze. (It's like group Russian roulette, but each shooter may shoot at himself.) By an ingenious argument, they show that it can be written as the sum of $n-2$ independent (but not identically distributed) Bernoulli random variables. Then they use a sort of generalization of the Chernoff bound to get a tail bound.
This isn't the place to expand on this outline, and it would severely test my MathJax skills to try, but if the sketch above makes sense to you, I think you'd enjoy the paper.
Practical Details of Computation
In order to get accurate answers all the authors' computations are done in integer arithmetic in Mathematica. The terms in the sum for $P(n,k)$, which are all integers, are computed with full precision. The probabilities are all multiplied by $10^{10}$ and truncated to the next lower integer.
I don't have access to Mathematica, so I tried to verify the computations in python. I was able to do so up to $n=2,000$ but even after all the optimizations I could find, it's clear that $n=6,000$ is beyond my reach.
It is not possible, so far as I can see, to duplicate the calculations in C without using an extended precision library like GMP, because the numbers involved in the calculations are so huge. Even if you could somehow avoid the problems of exponent overflow and underflow, and I don't see how you can, you have the problem of subtracting the huge terms in the sum to produce a number between 0 and 1, so that you are essentially ending up with a rounding error. My experiments in C++ failed badly; I started getting garbage long before I reached $n=100.$