Josephus problem: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Petelomax (talk | contribs)
7,878 edits
m →‎{{header|Phix}}: removed Quackery from unclassified
Shuisman (talk | contribs)
1,111 edits
Line 2,511:
</pre>
 
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang mathematica>survivor[n_, k_] := Nest[Most[RotateLeft[#, k]] &, Range[0, n - 1], n - 1]
survivor[41, 3]</lang>
{{out}}
<pre>{30}</pre>
{30}
</pre>
 
=={{header|MATLAB}}==
Retrieved from "https://rosettacode.org/wiki/Josephus_problem"