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]

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).

Nevermind, found out how to run it.

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

Ah right, that explains it. Thanks again!