Возведение в степень Опции

[ramzes]

кто-нибудь в курсе, есть ли классический вариант возведения в спепень выражения вида:
(a+ib)^n
(комплексного числа.)
Мне надо получить, например, (a+ib)^2=a^2+2iab+(ib)^2=a^2+2iab-b^2;
максимальное n=10.
Конечно, можно записать многочлен для каждой степени (и это оправдано с точки зрения производительности), но хотелось бы универсализма. А вдруг n=100, в ручную возводить - охренеешь.

[Lapp]

возведения в спепень выражения вида:
(a+ib)^n
...
Мне надо получить, например, (a+ib)^2=a^2+2iab+(ib)^2=a^2+2iab-b^2;

Мне так и осталось непонятным, что именно ты хочешь.

1. Если а и b - это конкретные числа, то просто реализуй комплексную арифметику.
Тип:

type
  tComplexNumber = record
    a,b : real
  end;

И операцию умножения (другие, вроде как, не нужны):

procedure MultComplex(var z: tComplexNumber; x,y: tComplexNumber);
begin
  z.a := x.a*y.a - x.b*y.b;
  {вторую строчку допиши сам}
end;

И тогда перемножай числа в простом цикле for хоть 10 раз, хоть 100, хоть до умопомрачения..

2. А если тебе нужен сам вид многочлена, его коэффициенты (чего я вообще-то не понимаю, ибо, например, i^2 = -1, и т.д., так что в нем можно приводить подобные, а в результате все равно получишь тот же результат, что и в способе 1), то - метод Michael_Rybak тебе в помощь..