sxzwl 2022-08-01 20:54 采纳率: 100%
浏览 9
已结题

powershell

#test.ps1
#为什么我总觉得它在按字典序排列? 我想让它用数字方式排列
#测试用例:
#How many numbers: 5
#Number0: 123421
#Number1: 1211111
#Number2: 12111101
#Number3: 10
#Number4: 13
$n = Read-Host 'How many strings'
$i = 0
[System.Collections.ArrayList] $a = @()
function PLsort($l, $r) {
    if ($l -gt $r) {
        return
    }
    $i = $l
    $j = $r
    $temp = $a[$l]
    while ($i -ne $j) { 
        while ( ( $a[$j] -ge $temp) -and ($i -lt $j)) {
            $j--
        }

        while ( ( $a[$i] -le $temp) -and ($i -lt $j)) {
            $i++
        }
        if ($i -lt $j) {
            $t = $a[$i]
            $a[$i] = $a[$j]
            $a[$j] = $t
        }
    }
    $a[$l] = $a[$i]
    $a[$i] = $temp
    $str = ''
    for ($p = $l; $p -le $r; $p++) {
        $str += $a[$p] + ' '
    }
    Write-Host $str
    PLsort $l ($i - 1)
    PLsort ($i + 1) $r
   
}
while ($i -lt $n) {
    $tmp = Read-Host Number$i
    $null = $a.Add(@($tmp)) 
    $i++
}
PLsort 0  ($n - 1)
$a

  • 写回答

0条回答 默认 最新

    报告相同问题?

    问题事件

    • 系统已结题 8月9日
    • 创建了问题 8月1日

    悬赏问题

    • ¥20 python忆阻器数字识别
    • ¥15 无法输出helloworld
    • ¥15 高通uboot 打印ubi init err 22
    • ¥20 PDF元数据中的XMP媒体管理属性
    • ¥15 R语言中lasso回归报错
    • ¥15 网站突然不能访问了,上午还好好的
    • ¥15 有没有dl可以帮弄”我去图书馆”秒选道具和积分
    • ¥15 semrush,SEO,内嵌网站,api
    • ¥15 Stata:为什么reghdfe后的因变量没有被发现识别啊
    • ¥15 振荡电路,ADS仿真