function [] = plotpow(z, n)
    w = z^n;
    x = real(w);
    y = imag(w);
    txt = sprintf('z^{%d}', n);
    hold on
    plot([0 x],[0 y], 'b', 'linewidth', 1);
    plot(x, y, 'b.', 'MarkerSize', 8);
    text(x, y, txt,'HorizontalAlignment','left');
    axis equal;
    hold off
end
