Двумерный массив Delphi

[Wise]

Помогите пожалуйста кто-нибудь. Завтра сдавать.
Задача: Упорядочить строки целочисленной прямоугольной матрицы по возрастанию количества элементов в каждой строке и найти номер первого из столбцов не содержащих ни одного отрицательного элемента.
Заранее спасибо.

[north]

1)предлагаю сначала отсортировать элементы по возрастанию в каждой строке, потом по посленднему элементу сортируем строки.

2)

while (t<>true)or (i<=m{кол-во столбцов}) do begin;
   inc(i);
  t:=true;
   for j:=1 to n do{кол-во строк}if a[i,j] < 0 then begin
          t:=false;
          break;
          end;
    end;
for j:=1 to n do write(a[i,j]);

[Wise]

прошу прощения.. не так написал условие..
Упорядочить строки целочисленной прямоугольной матрицы по возрастанию количества одинаковых элементов в каждой строке и найти номер первого из столбцов не содержащих ни одного отрицательного элемента.
Может кто-нибудь поможет? Лучше всего, если напишите код полностью.. но всё равно спасибо

[north]

отсортровать элементы будет надо.
взять массив, взять пременную(max), которая будет содержать макс. кол. повторений какого-нибудь элемента, взять переменную, которая будет содержать текущее кол-во повторений элемента рассматриваемого в это время(t). Если m<t then m:=t.
Так для каждой строки, каждый раз a[{номер строки}]:=m;

[Wise]

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

отсортровать элементы будет надо.
взять массив, взять пременную(max), которая будет содержать макс. кол. повторений какого-нибудь элемента, взять переменную, которая будет содержать текущее кол-во повторений элемента рассматриваемого в это время(t). Если m<t then m:=t.
Так для каждой строки, каждый раз a[{номер строки}]:=m;

Вроде всё понятно, но понятно, что ничего не понятно..
Можешь кинуть код.. так явно легче понять..

[Wise]

Всё.. разобрался, спасибо.