以前有学了QB,VB,C,JAVA,PB。现在工作的地方用Delphi,于是就开始学习这个。即来之则安之~``本来就是搞网络技术方面的,但是感觉总是没什么突破,不能就这样生活下去啊~``于是就学学这个了~`首先就搞了本基础书看起来,还行,也装了个Delphi7,跟以前学的VB很相似,都是OOP嘛
路漫漫其修远矣,吾将上下而求索
procedure sort(var a : array of integer); //排序处理过程
var x,i,j: integer;
begin
for i:=0 to length(a)-1 do
for j:=i to length(a)-1 do
if a[i]>a[j] then
begin
x:=a[j];
a[j]:=a[i];
a[i]:=x;
end;
end;