Отсортировать по убыванию элементы 5 столбца массива A [10,10]
Вот цикл сортировки: For i:=1 to 9 do begin If A[i,5]End;
Нужна целая программа!