Resultant[x^4 - 5 x^3 + a x^2 - 7 x + 2, D[x^4 - 5 x^3 + a x^2 - 7 x + 2,x],x]