Table[D[ArcTan[x/a], {x, n}], {n, 1, 10}]