RosettaCodeData/Task/Josephus-problem/Tcl/josephus-problem-2.tcl
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

2 lines
83 B
Tcl

puts "remaining: [josephus 41 3]"
puts "remaining 4: [join [josephus 41 3 4] ,]"