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

uses NumLibABC;

begin
  Writeln('Матрица А');
  var A:=new Matrix(MatrGen(6,6,(i,j)->i>j?1.0:2*Sin(i+1+Cos(j+1))));
  A.Println(12,8);
  Writeln('Матрица B');
  var B:=new Matrix(MatrGen(6,1,(i,j)->6*Ln(2+i)));
  B.Println(12,8);
  Writeln('Матрица X'); // X:=A^(-1)xB
  var X:=A.Inv*B;
  X.Println(12,8)
end.