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

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('n=');  var a:=new integer[n,n];  var r:=1.To(n).ToArray;  for var i:=n-1 downto 0 do begin    a.SetRow(i,r);    r:=r[1:]+Arr(0)    end;  a.Println(3)end.