как в паскале написать (-1) в степени i? exp(i*ln(-1)) - выдает ошибку ln от отрицательного числа

А если сразу надо степень безотносительно предыдущего значения, что умножать будем? Можно обойтись одним if (если показатель четный, то единица и минус один в противоположнм случае) , а можно и так

(-1)^n = 1 - n and 1 shl 1

Или так, как у Капитана