Rockstar, 70 66 62 61 60 bytes
listen to N
cast N
F's1
while N
let F be*N
let N be-1
say F
Try it here (Code will need to be pasted in)
listen to N
cast N
F's1
while N
let F be*N
let N be-1
say F
Try it here (Code will need to be pasted in)