Программа с матрицей

[ВадикСтрах]

Необходимо в ближайшее время...
Дана целочисленная квадратная матрица. Определить:
1. Найти номер максимального элемента в каждой строке матрицы.
2. Упорядочить её строки по возрастанию количества их положительных элементов.
Язык Delphi.

[Stilet]

по возрастанию количества

Это как?
Начсет первого - покажи как ты матрицу вводишь.

[ВадикСтрах]

var
i,j:integer;

begin
n:=strtoint(Memo2.Text);

if (radiobutton2.checked=true) then
begin
randomize;
for i:=0 to n-1 do
for j:=0 to n-1 do
begin
a[i+1,j+1]:=random(19)-9;
Stringgrid1.cells[j,i]:=inttostr(a[i+1,j+1]);
end;
end;
end;

[ВадикСтрах]

Я не правильно написал задание:
Необходимо в ближайшее время...
Дана целочисленная квадратная матрица. Определить:
1. Найти номер максимального элемента в каждой строке матрицы.
2. Упорядочить её строки по возрастанию.
Язык Delphi, матрица должна быть в StringGrid, если надо, первоночальные наброски могу скинуть...