FindSequenceFunction[Table[Det[HilbertMatrix[n]],{n,10}],n]

Table[Det[HilbertMatrix[n]],{n,10,50}]==Table[%,{n,10,50}]