Ah right, that explains it. Thanks again!

Glad to help! If you're able to tell me, what was causing the issue? Otherwise thank you for such a great tool.

Nevermind, found out how to run it.

Is this some form of source code?

Apologies if I'm missing something obvious, I am not particularly knowledgeable in the world of maths (this came from me experimenting with fractional powers of complex numbers to learn about them more deeply).

Noting that E^(I Pi(1+2n))=-1 for {n,0,6}

Do[Print[Re[E^(I Pi (1 + 2 n)/7)], "   ", 
  Im[E^(I Pi (1 + 2 n)/7)]], {n, 0, 6}]

Cos[\[Pi]/7]   Sin[\[Pi]/7]

Sin[\[Pi]/14]   Cos[\[Pi]/14]

-Sin[(3 \[Pi])/14]   Cos[(3 \[Pi])/14]

-1   0

-Sin[(3 \[Pi])/14]   -Cos[(3 \[Pi])/14]

Sin[\[Pi]/14]   -Cos[\[Pi]/14]

Cos[\[Pi]/7]   -Sin[\[Pi]/7]