with(LinearAlgebra);
Digits:=40;
n:=14;
A:=Matrix(n,n);
for i from 1 to n do 
  for j from 1 to n do 
    A[i,j]:=1/(i+j-1); 
  end do;
end do;
evalm(evalf(Eigenvalues(A)));