鏈結串列的資料怎麼做排序 |
|
尚未結案
|
|
ohbu
一般會員   發表：1 回覆：0 積分：0 註冊：2011-05-16 發送簡訊給我 |
如題，我翻書也沒有看到相關的處理方法
請高手幫忙指點，謝謝 #include #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { AnsiString s1; int i,k=0; Node *head=NULL,*tail,*newptr,*ptr,*save; for(;;) //產生亂數鏈結串列 { srand(time(NULL)); i=rand(); ptr=head; while(ptr) { if(ptr->data==i) { ptr->count ; break; } tail=ptr; ptr=tail->next; } if(!ptr) { newptr=new Node; newptr->data=i; newptr->count=1; newptr->next=NULL; if(head==NULL) head=newptr; else tail->next=newptr; k ; } if(k>5) break; } ptr=head; while(ptr) //印出鏈結串列亂數資料 { s1.sprintf("%d %d",ptr->data,ptr->count); Memo1->Lines->Add(s1); tail=ptr; ptr=tail->next; delete tail; } } |
|
rick060
高階會員  發表：2 回覆：112 積分：217 註冊：2009-11-17 發送簡訊給我 |
發表時間：2011-05-16 18:51:31
IP:114.45.xxx.xxx 訂閱
系統時間：2024-04-27 12:30:11
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |