Potrzebuję algorytm lub kod programu który posortuje następującą tablicę dwuwymiarową:
Tab[index][Y]
Tab[index][X]
najpierw według X a jeśli X są równe to według Y. Oczywiście może być n równych X.
Jak na razie mam sortowanie według X (bąbelkowe):
//max liczba przejsc
m := k_2 - 1;
//sortowanie babelkowe
for i := 1 to m do
for j := i + 1 to k_2 do
if zb_2[j][poz_X] < zb_2[i][poz_X] then
begin
temp := zb_2[i][poz_X];
temp1 :=zb_2[i][poz_Y];
zb_2[i][poz_X] := zb_2[j][poz_X];
zb_2[i][poz_Y] := zb_2[j][poz_Y];
zb_2[j][poz_X] := temp;
zb_2[j][poz_Y] := temp1;
end;