displaying polynomial starting with highest term

In Mathematica, how can I take a polynomial, like p=1+x+3x^2-5x^6+x^7
and get it to display starting with the highest term rather than the
lowest term?

In particular, can I write a function f, so that f[p] would yield
x^7-5x^6+3x^2+x+1 ?

Or is there some option or preference I can set so that Print will do
this?

I want to be able to do this so that I can copy the (large) polynomial
from my Mathematica notebook and paste it in the document
I am writing, where I want to display the polynomial from highest to
lowest term.

.

Loading