排列的生成:(1..n)procedure solve(dep:integer);vari:integer; 排列的生成:(1..n)procedure solve(dep:integer);vari:integer; 参考答案 查看答案