Number reversal game: Difference between revisions

no edit summary
(→‎{{header|Racket}}: Added "#lang racket". Removed extra print if not initially shuffled. Bit of refactoring.)
No edit summary
Line 1,783:
end digits;
</lang>
 
=={{header|Powershell}}==
<lang Powershell>
$Array = 1..9 | Get-Random -Count 9
$nTries = 0
While(-join $Array -ne -join @(1..9)){
$nTries++
$nReverse = Read-Host -Prompt "[$Array] -- How many digits to reverse? "
[Array]::Reverse($Array,0,$nReverse)
}
"$Array"
"Your score: $nTries"
</lang>
 
 
=={{header|PureBasic}}==
Anonymous user