Number reversal game: Difference between revisions
m
→{{header|Oforth}}
Line 1,890:
0 while(l sort l <>) [
System.Out "List is " << l << " ==> how many digits from left to reverse : " << drop
System.Console askln asInteger dup ifNull: [ drop
1 + l left(n) reverse l right(l size n -) + ->l
]
| |||