RosettaCodeData/Task/Kaprekar-numbers/PowerShell/kaprekar-numbers-2.ps1
2026-04-30 12:34:36 -04:00

5 lines
302 B
PowerShell

"Kaprekar numbers less than 10,000:"
1..10000 | ForEach-Object {if (Test-Kaprekar -Number $_) {"{0,6}" -f $_}} | Format-Wide {$_} -Column 17 -Force
"Kaprekar numbers less than 1,000,000:"
1..1000000 | ForEach-Object {if (Test-Kaprekar -Number $_) {"{0,6}" -f $_}} | Format-Wide {$_} -Column 18 -Force