(1+\frac{π{\rm j}}{n})^n

precision = 100 (slider from 0 to 200, step 1)
n = 1 (slider from 0 to precision, step 1)
c: x^(2) + y^(2) = 1
L = Sequence((1 + (ί * pi / n))^(k), k, 1, n)
area = Polygon(Union[L, {(0, 0), (1, 0)}])
P_{last} = Element(L, Length[L])