Anonymous user
Best shuffle: Difference between revisions
→{{header|Elena}}
(→{{header|Kotlin}}: Updated example see https://github.com/dkandalov/rosettacode-kotlin for details) |
|||
Line 1,359:
=={{header|Elena}}==
<lang Elena>#
▲#define extensions.
{
[
0 to:(anOriginal length - 1) &doEach: (:i)
Line 1,374 ⟶ 1,373:
0 to:(anOriginal length - 1) &doEach: (:j)
[
if ((i != j)
[
aShuffled exchange:i:j.
Line 1,384 ⟶ 1,383:
]
[
0 to:(anOriginal length - 1) &doEach: (:i)
[ if ((anOriginal @ i) == (aShuffled @ i))
^ aScore
]
}
[
("abracadabra", "seesaw", "grrrrrr", "pop", "up", "a") run &each: aWord
[
console writeLine:"The best shuffle of ":aWord:" is ":aShuffled:"(":(aShuffled score:aWord):")".
|