请问我们这台爱宝满3000怎么也拧不到编程上面去，这是怎么回事呢！
答案:1 悬赏:70 手机版
解决时间 2021-02-18 03:06
- 提问者网友：世勋超人
- 2021-02-17 04:56
请问我们这台爱宝满3000怎么也拧不到编程上面去，这是怎么回事呢！
最佳答案
- 五星知识达人网友：风格不统一
- 2021-02-17 05:17
#!/usr/bin/perl
subselect_sort{
my(*array)=@_;
$length=@array;
for($i=0;$i<$length-1;$i++)
{
$min=$i;
for($j=$i+1;$j<$length;$j++)
{
if($array[$j]<$array[$min])
{
$min=$j;
}
if($min!=$i)
{
$temp=$array[$i];
$array[$i]=$array[$min];
$array[$min]=$temp;
}
}
return@array;
}
subselect_sort{
my(*array)=@_;
$length=@array;
for($i=0;$i<$length-1;$i++)
{
$min=$i;
for($j=$i+1;$j<$length;$j++)
{
if($array[$j]<$array[$min])
{
$min=$j;
}
if($min!=$i)
{
$temp=$array[$i];
$array[$i]=$array[$min];
$array[$min]=$temp;
}
}
return@array;
}
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯