Question

PascalABC.NET - Сформировать квадратную матрицу порядка n ( где n — четное число) по заданному образцу:

Answer 1

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  var a:=MatrGen(n,n,(i,j)->i<j ? 0 : i=j ? n : n-i+j);
  a.Println(3)
end.