возвести в степень

[gylayko]

вот пример s:=(x*x*x/3)+exp(ln(-1)*(n+1))*(exp(ln(x)*3*n))/(2*n-1)*(n+2) но ведь не может быть логарифм с (-1) как еще можно указать степень?

[Sweta]

Вы хоть изредка читаете ответы? Я ведь Вам уже писала, что (-1)в нечетной степени = -1, а (-1) в четной степени =1.
Следовательно, Вам не надо возводить ее в степень, просто, необходимо определить степень четная или нечетная, т.е делится на 2 без остатка или нет, а дальше ваше выражение умножать на -1 или +1.
Думаю модераторам скоро надоест и они начнут закрывать Ваши повторяющиеся темы.

[gylayko]

ну вот смотрите
var x,s:real;
n:integer;
begin
x:=0.2;
for n:=1 to 7 do
if n mod 2=0 then
s:=(x*x*x/3)+exp(ln(-1)*(n+1))*(exp(ln(x)*3*n))/(2*n-1)*(n+2) else
s:=(x*x*x/3)+exp(ln(1)*(n+1))*(exp(ln(x)*3*n) )/(2*n-1)*(n+2);
writeln('summa=',s:0:3);
readln;
end.
выдает ту же самую ошибку! нифига не меняется!!!!

[Sweta]

В Паскале я не очень, но делала бы следующим образом
s:=(x*x*x/3) ; это первый член суммы.
for n:=1 to 7 do ; цикл от 1 до 7 синтаксис длжны знать Вы
;--- Это выполняется в цикле судяпо всему д.б. begin
if (n +1) mod 2=0 then ; если степень. в которую возводим четная
s:=s+(exp(ln(x)*3*n))/(2*n-1)*(n+2);
else ; если степень. в которую возводим нечетная
s:=s-(exp(ln(x)*3*n))/(2*n-1)*(n+2);
;----это конец цикла думаю - end
writeln('summa=',s:0:3);
readln;
end.
Синтаксиса и правил Паскаля на знаю. Проверьте все.

[gylayko]

ну сделал так, теперь в строчке if (n +1) mod 2=0 then показывает синтаксическую ошибку!

[Sweta]

Я ведь предупредила о своих знаниях. Но по аналогу в С думаю
if ((n +1) mod 2=0 )then
да а вформуле если все выражение (2*n-1)*(n+2) в знаменателе, то ((2*n-1)*(n+2) ).