z^n

A = (0, 0)
z = (1, 0.5)
u = Vector(A, z)
n = 1 (slider from 1 to 50, step 1)
z_1: z^(n)
i = (0, 1)
v = Vector(A, z_1)
w: z^(n)
texto2: "z^n=w \Leftrightarrow  (" + (LaTeX[z]) + ")^" + (LaTeX[n]) + "=" + (LaTeX[w]) + ""
texto1: "Potências  de  números  complexos (fórmula de Moivre).   
Escolha  z=" + z + ", e depois clique  no play  
para ver as sucessivas potências de z:"