本帖最后由 pd1 于 2023-9-9 02:02 编辑
- function f($str,$n)
- {
- [System.Collections.ArrayList]$a=@()
- [System.Collections.ArrayList]$b=@()
- if($n -eq 1)
- {
- foreach($i in $str)
- {
- $c=$a.Add($i)
- }
- $c=$b.Add($a)
- return $b
- }
- else
- {
- $c=$b.Add($str)
- for($m=0;$m -lt $n-1;$m++)
- {
- foreach($j in $b[$m])
- {
- foreach($k in $str)
- {
- $c=$a.Add($j+$k)
- }
- }
- $c=$b.Add($a)
- $a=@()
- }
- return $b
- }
- }
- $str="abc123".TocharArray()
- $n=1
- (f -str $str -n $n)>result.txt
复制代码
|