2007年8月9日
pascal 实现排序法
摘要： procedure swap(var x,y:integer); var temp:integer; begin temp:=x; x:=y; y:=temp; end; //冒泡排序 procedure BubbleSort(var ... 阅读全文
posted @ 2007-08-09 18:02 寒山潜龙 阅读(503) 评论(0) 推荐(0) 编辑