Solve[Det[{{k,-k,3},{0,k+1,1},{k,-8,k-1}}] == 0]