Tak oto ja programista amator 'samłuk' zawsze sobie sortowałem w TurboPascalu tablicę tak:
for i:=1 to 30 do
for j:=i+1 to 30 do
if z[i]>z[j] then
begin
z[0]:=z[j];z[j]:=z[i];z[i]:=z[0];
i:=1;j:=i+1;
end;
i jako, że mi to odpowiadało (nie wiem czy ten sposób macie jakoś nazwany 'ort!' czy inny -> nie wiem bo nigdy nie czytalem :)) to jak to robie chcialem tak zrobic w delphi rowniez, ale oczywiscie ZONK, delphi nie pozwala wplynac na 'i' oraz 'j' gdy kreca sie w tablicy :|
Może coś można z tym zrobić ?
'i' i 'j' są zadeklarowane lokalnie :)