Как возвести число в отрицательную степень, не использую функцию Power?
Число в отрицательную степень или отрицательное число в степень?
Отрицательное число можно возводить только в целую степень (уже с рациональной ни фига не понятно, а как мы получили понятие «действительная степень»? — дополнили рациональную по непрерывности).
Тут вам надо возвести −1 в степень n, и проще всегоIfThen(Odd(n), -1, 1)
Для этого ряда так подходит. Но если перед нами ряд для синуса, который вычисляется рекуррентно, то x2 := Sqr(x);
...
yNew := -yOld * x2 / ((n - 1) * n);
Эх, вспомнил школу. По-моему, это было на первом уроке по паскалю - возведение числа а в степень b:function MyPower(a,b:real):real;
begin
      Result := exp(b*ln(a));
end;