Number reversal game: Difference between revisions

m
Added Sidef
m (Added Sidef)
Line 2,864:
Congratulations, you sorted the list in 7 reversals.
</pre>
 
=={{header|Sidef}}==
{{trans|Perl}}
<lang ruby>var turn = 0;
var jumble = (1..9 -> bshuffle); # best-shuffle
 
while (jumble != 1..9) {
turn++;
printf("%2d: %s - Flip how many digits ? ", $turn, jumble.join(' '));
var d = read(Number);
jumble.@[0 .. d-1] = [jumble.@[0 .. d-1]].reverse...;
}
 
print " #{jumble.join(' ')}\n";
print "You won in #{turn} turns.\n";</lang>
 
=={{header|Tcl}}==
2,747

edits