WMA link
Exponent[expr, form]
Exponent[expr, form, h]
Exponent[5 x^2 - 3 x + 7, x]
Exponent[(x^3 + 1)^2 + 1, x]
Exponent[x^(n + 1) + Sqrt[x] + 1, x]
Exponent[x / y, y]
Exponent[(x^2 + 1)^3 - 1, x, Min]
Exponent[0, x]
Exponent[1, x]