двумерн массив(Delphi)

[Дешук Елена]

Дана матрица M*N.Найти кол-во её строк, элементы которых упорядочены по возрастанию...

[IT-man]

c:=0;
for i:=1 to m do begin
f:=true;
for j:=2 to n do 
if a[i,j]<a[i,j-1] then begin f:=false; break;end;
if f then inc(c);
end;
Writeln(c);

[Дешук Елена]

Спасибо большое!