С++
Дана квадратна матриця A порядку M. Знайти суму елементів її головної діагоналі.

var

  number, N, npol, notr, n0, i: integer;  {npol - количество положительных чисел, notr - количество отрицательных, n0 - количество нулей}

 

begin

  writeln('Введите N');

  readln(N);

  for i:= 1 to N do

  begin

    writeln('Введите целое число');

    readln(number);

    if number < 0 then notr:= notr + 1;

    if number > 0 then npol:= npol + 1;

    if number = 0 then n0:= n0 + 1;

  end;

  writeln('Было введено ', notr, ' отрицательных чисел, ', npol, ' положительных чисел, ', n0, ' нулей');

end.

А для тестов ты просто вводишь числа и проверяешь, правильно ли нашлось количество.

#include <iostream>

using namespace std;

long Factorial(int num)
{
  long res = 1;
 
  for (int i = num; i > 1; i--)
    res *= i;
  return res;
}

int NumOfElements(int **matrix, int mSize, int nSize)
{
  int res = 0;

  for (int i = 0; i < mSize; i++)
  {
    for (int j = 0; j < nSize; j++)
      if (matrix[i][j] % 2 == 0 && matrix[i][j] < 0)
        res++;
  }
  return res;
}

int main()
{
  int
    num,
    **matrix,
    mSize,
    nSize;

  cout << "Input a number: ";
  cin >> num;

  cout << num << "! = " << Factorial(num) << endl;

  cout << "Input a matrix size: ";
  cin >> mSize >> nSize;

  matrix = new int*[mSize];
  for (int i = 0; i < mSize; i++)
    matrix[i] = new int[nSize];
  for (int i = 0; i < mSize; i++)
    for (int j = 0; j < nSize; j++)
      cin >> matrix[i][j];

  cout << "Num. of the elements = " << NumOfElements(matrix, mSize, nSize) << endl;
 
  system("pause");
  return 0;
} /* End of the 'main' function */