帮帮我ㄅ ..

访客只能看到部份内容，免费 加入会员 或由脸书 Google 可以看到全部内容

我的即时通架email]Olove200675@yahoo.com.tw[/email]
知道的人请交我一下
谢谢噜

你这样说 也很难帮你阿..
要用哪种写法？

连结串列？
堆叠？
伫列？

讲清楚才能帮阿^^"

这是我写ㄉ程式~要变成插入排序的地方有问题~刚开始先从0到50取10ㄍ乱数在从小排到大
Label1显示那时ㄍ乱数
Label2显示已用插入排列从小排到大的结果
ListBox1显示Label2计算的过程
下面是我做的程式但是在Label2的地方就有问题ㄌ
请帮我想想办法~因为刚学老师又没说ㄉ很清楚所以还不怎ㄇ懂


void __fastcall TForm1::Button1Click(TObject *Sender)
{
if (flag == 0)
{
Label1->Caption="";
Label2->Caption=" ";
ListBox1->Items->Clear();
randomize();
for (i=0;i<10;i++)
    a = random(50);
Button1->Caption="插入排列" ;
flag = 1;
for (i=0;i<10;i++)
Label1->Caption=Label1->Caption+a+" ";
}
else {
    for (i=1;i<10;i++)
    {
      for(j=i-1;j>=0;j--)
      {
          if(a>a[j])
          break;
          j++;
          if(j<=i-1){
          tmp=a;
          for(k=j;k>=i-1;k--)
          a[k+1]=a[k];
          a[j]=tmp;
      }
      }

        for (i=0;i<10;i++)
        {
          Label2->Caption=Label2->Caption+a+" ";
          ListBox1->Items->Add(Label2->Caption);
          Button1->Caption="产生列数";
          flag=0;
          }
      }
  }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
Form1->Close();
}
//---------------------------------------------------------------------------

复制程式

请问是换到哪一段上面
请跟我说依下
谢噜