R, 33 bytes
Or R>=4.1, 26 bytes by replacing the word function with \.
function(p)(rev(n<-seq(p))*n)%*%p
pajonk
- 18.3k
- 3
- 26
- 74