Сортировка двумерного массива

[bilibian]

Привет!

Есть массив:

MyArray[0][0] := 1;
MyArray[0][1] := param1;
MyArray[0][2] := param2;
MyArray[1][0] := 9;
MyArray[1][1] := param1;
MyArray[1][2] := param2;
MyArray[2][0] := 4;
MyArray[2][1] := param1;
MyArray[2][2] := param2;

Как его отсортировать, чтобы он выглядел так:

MyArray[0][0] := 9;
MyArray[0][1] := param1;
MyArray[0][2] := param2;
MyArray[1][0] := 4;
MyArray[1][1] := param1;
MyArray[1][2] := param2;
MyArray[2][0] := 1;
MyArray[2][1] := param1;
MyArray[2][2] := param2;

[min@y™]

в сортировке должна быть закономерность. где она тутЪ?

[Аватар]

тутЪ

строки сортируются по убыванию значений в нулевом столбце

[bilibian]

Есть идеи как можно это сделать?

Основная задача заключается в следующем:

Необходимо достать из массива три элемента с наибольшим значением в нулевом столбце.

[evg_m]

Необходимо достать из массива три элемента с наибольшим значением в нулевом столбце.

a1:=0;// первый и пока самый лучший

if m[1][0]>m[a1][0] then begin a2:=a1; a1:=1; end //а второй-то лучше
else begin a2:=1; end; // не лучше но на втором месте

     if m[2][0]>m[a1][0] then begin a3:=a2; a2:=a1; a1:=2; end // а третий еще лучше
else if m[2][0]>m[a2][0] then begin a3:=a2; a2:=2; end // не самый лучший
else begin a3:=2; end; // не лучше но на третьем месте

for j:=3 to length(myarray,1)-1 do begin
       if m[j][0]>m[a1][0] then begin a3:=a2; a2:=a1; a1:=j; end // претендент на первое место
  else if m[j][0]>m[a2][0] then begin a3:=a2; a2:=j; end // на второе место
  else if m[j][0]>m[a3][0] then begin a3:=j; end // на третье место
  else ; //нам такое не нужно (у нас ВСЕГО три места)
end;

//три САМЫХ ЛУЧШИХ
myarray[a1][*]
myarray[a2][*]
myarray[a3][*]

[northener]

Сообщение от bilibian

Есть идеи как можно это сделать?

Основная задача заключается в следующем:

Необходимо достать из массива три элемента с наибольшим значением в нулевом столбце.

А сортировка тут при чём, уважаемый?