Cái bạn Hxthanh giải thích thế mình thấy chuẩn men rồi gì nữa, nếu bạn không hiểu, thì có thể sửa thuật toán lại thành :
For i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then
begin
t:=a[i];
a[i]:=a[j];
a[j]:=t;
end;
như thế là chạy sẻ dễ hiểu hơn rồi đó
có lẻ dễ hiểu hơn rồi ,đa tạ bác