Delphi. Степень

[Tony Hudson]

Добрый вечер. Как записать данное выражение в Delphi?
S=(-1)^n* ((x^2n+1)/(2n+1))

[Вадим Мошев]

Я бы так посоветовал:

if odd(n) then begin
	sgn:=-1;
end else begin
	sgn:=1;
end;

s:=sgn*exp((2*n+1)*ln(x)) / (exp((2*n)*ln(x)));

[Tony Hudson]

Сообщение от Вадим Мошев

Я бы так посоветовал:

if odd(n) then begin
	sgn:=-1;
end else begin
	sgn:=1;
end;

s:=sgn*exp((2*n+1)*ln(x)) / (exp((2*n)*ln(x)));

Спасибо большое

[Аватар]

Ни чего не понял. А где исходный ряд? Там по другому можно скорее всего