[Tin] Pascan và vấn đề thi HSG Tin học

[voimonster]

cậu xem lại cách sắp xếp mảng đi nhé

theo thành thì thế này cơ

for i:= 1 to n-1 do
for j:=2 to n do
if a[i] > a[j] then
begin
t:=a[i];
a[i]:=a[j];
a[j]:= t;
end;

Giống nhau cả có khác gì đâu.
Đều phải khai hai biến i,j và một biến t để đổi.
Không tin thì viết vào Turbo thử xem !