КОМЕК БЕРЕМ ОТИННМ КОМЕК КЕРЕ​

#include <iostream>
#include <locale>

using namespace std;

int main()
{
  setlocale(LC_ALL,"Rus");
  int n;
  cout << "n = ", cin >> n;
  int *A = new int[n];
  cout << " введите массив из "<< n <<" элементов:\n";
  for (int i = 0; i < n; i++)
  {
    cin >> A[i];
  }
  cout <<"\nПолучившийся массив: [";
  for (int i = 0; i < n; i++)
  {
    cout << " " << A[i];
  }
 
  bool Simmetriya = true;
  for (int i = 0; i <= (int)(n/2); i++)
  {
    if (A[i] != A[n-i-1])
    {
      Simmetriya = false;
      break;
    }
  }
  cout << (Simmetriya?" ] симметричен":" ] НЕ симметричен") << "\n";
  if (Simmetriya)
  {
    for (int i = 0; i < (int)(n/2); i++)
    {
      for (int j = i; j < (int)(n/2); j++)
      {
        swap(A[i],A[j]);
        swap(A[n-i-1],A[n-j-1]);
      }
    }
  }
  else
  {
    for (int i = 0; i < (int)(n/2); i++)
    {
      swap(A[i],A[(int)(n/2)+n%2+i]);
    }
  }
  for (int i = 0; i < n; i++)
  {
    cout << A[i] << " ";
  }
  cout << '\n';
  return 0;
}

PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var a:=MatrRandom(m,n,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var (p,q):=ReadInteger2('Укажите номера строк для обмена: ');
  a.SwapRows(p-1,q-1);
  Writeln('*** Полученный массив ***'); a.Println(4);
  (p,q):=ReadInteger2('Укажите номера столбцов для обмена: ');
  a.SwapCols(p-1,q-1);
  Writeln('*** Полученный массив ***'); a.Println(4);
end.