如何整理这些数据? 举个例子1 12 23 44 55 76 8 如何让1 2 4 5 7 8排列成 1 2 3 4 5 6?说说算法也行 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你这些数据是存放在那里的?数据库里马,可以使用asc来排列的 void BubbleSort(SeqList R) { //R(l..n)是待排序的文件,采用自下向上扫描,对R做冒泡排序 int i,j; Boolean exchange; //交换标志 for(i=1;i<n;i++){ //最多做n-1趟排序 exchange=FALSE; //本趟排序开始前,交换标志应为假 for(j=n-1;j>=i;j--) //对当前无序区R[i..n]自下向上扫描 if(R[j+1].key<R[j].key){//交换记录 R[0]=R[j+1]; //R[0]不是哨兵,仅做暂存单元 R[j+1]=R[j]; R[j]=R[0]; exchange=TRUE; //发生了交换,故将交换标志置为真 } if(!exchange) //本趟排序未发生交换,提前终止算法 return; } //endfor(外循环) } //BubbleSort 冒泡排序 这些数据是在treeview.select.text里面的 就是相当于把中间段开的号重新整理 delphi dbgrideh 导出EXCEL 问题 DataSet导出Execl格式问题 兄弟们,如何获得当前正在使用的输入法名称 fastreport 的打印问题 关于报表 100分! 高难度,有人找到方法再给分 谁有DbGridEh详解 请教!!类似象棋棋子在棋盘上拖动如何实现? 跪求 用delphi编写一个类似于文件浏览器的软件 显示word 文档信息 TDataSource有何用途? 这是我全部的分了,大家来拿吧。 如何判断某一天为星期几,并且到周末就把这一周的数据累计一下呢? delphi中可不可以设置DBGird的属性
{ //R(l..n)是待排序的文件,采用自下向上扫描,对R做冒泡排序
int i,j;
Boolean exchange; //交换标志
for(i=1;i<n;i++){ //最多做n-1趟排序
exchange=FALSE; //本趟排序开始前,交换标志应为假
for(j=n-1;j>=i;j--) //对当前无序区R[i..n]自下向上扫描
if(R[j+1].key<R[j].key){//交换记录
R[0]=R[j+1]; //R[0]不是哨兵,仅做暂存单元
R[j+1]=R[j];
R[j]=R[0];
exchange=TRUE; //发生了交换,故将交换标志置为真
}
if(!exchange) //本趟排序未发生交换,提前终止算法
return;
} //endfor(外循环)
} //BubbleSort
冒泡排序