Table[Round[n/Tan[(d Pi)/180]] - Round[(n - 1)/Tan[(d Pi)/180]], {n, 1, 16}] where d = 10

Uh oh! Wolfram|Alpha doesn't run without JavaScript.

Please enable JavaScript. If you don't know how, you can find instructionshere.Once you've done that, refresh this page to start using Wolfram|Alpha.