RosettaCodeData/Task/Josephus-problem/PARI-GP/josephus-problem.pari

2 lines
71 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
Josephus(n, k)=if(n<2, n>0, my(t=(Josephus(n-1, k)+k)%n); if(t, t, n))