задача на матрицы Опции

[sanchoflat]

доброе утро, поступил в универ, в школе не было паскаля, а тут сразу задачи решать без объяснения
если не сложно помогите решить задачу:
Найти сумму элементов матрицы и подсчитать число её строк, в пределах каждой из которых элементы упорядочены по возрастанию: Аi1<Ai2<...<Ain

[Lapp]

Найти сумму элементов матрицы и подсчитать число её строк, в пределах каждой из которых элементы упорядочены по возрастанию: Аi1<Ai2<...<Ain

Сумму примерно вот так:

const
  m= 10;
  n= 20;
var
  a: array[1..m,1..n] of integer;
  i,j,s: integer;

begin
  {тут задаем матрицу}
  s:= 0;
  for i:=1 to m do for j:=1 to n do s:= s+a[i,j];
  writeln('sum = ', s);
end.

А для подсчета упорядоченых строк можно использовать, например, такой фрагмент кода:

  k:= 0;
  for i:=1 to m do begin
    j:=1;
    while (j<n) and (a[i,j]<a[i,j+1]) do inc(j);
    if j=n then inc(k)
  end;

Делай и говори, что получается, а что нет. Успехов.