RosettaCodeData/Task/Josephus-problem/J/josephus-problem-1.j

3 lines
51 B
Text
Raw Permalink Normal View History

2013-06-05 21:47:54 +00:00
3 ([ (1 }. <:@[ |. ])^:(1 < #@])^:_ i.@]) 41
30