CРОЧНО!!!!!
Дана квадратная матрица А(n× n). Найти количество отрицательных
элементов в заштрихованной части.

const max = 100;var i,j,k,m,n: integer;    a: array[1..max,1..max] of integer;begin  write('n = ');  readln(n);  for i:=1 to n do  begin    for j:=1 to n do    begin      a[i,j]:=random(-50,50);      write(a[i,j]:4);    end;    writeln;  end;  k:=0;  m:=n div 2;  if m*2<n then m:=m+1;    for i:=1 to m do  for j:=(n-i+1) to n do  begin    if (a[i,j]<0) then k:=k+1;    if ((a[i,j]<>a[n-i+1,j]) and (a[n-i+1,j]<0))       then k:=k+1;  end;    writeln('количество отрицательных элементов: ',k);end.n = 5 -48  35 -41 -16  18 -40  -2 -49  25 -12  34 -19 -10  40 -21  14 -28 -34  49  46 -30  45 -13  41  31количество отрицательных элементов: 3