Вычислить сумму
n
∑ (-1)n / (2i)
i=1
Помогите написать решение в паскале
Var
s : Real;
i,n : Integer;
Begin
s:=0;
Readln(n);
For i:=1 to n do s:=s-n/(2*i);
end.
Оцени ответ
