Цикл for в Паскаль

[Devil Jin]

Есть формула: (-1 в степени n+1) деленное на n в квадрате. Выполнять от 1 до 10. Правильно ли я записал?

program cycle;
uses crt;
var i:integer; s:real;
begin
clrscr
for i:=1 to 10 do
begin
s:=exp((-1*ln(1))*(i-1))/sqr(i);
end;
writeln(s:5:2);
readln;
end.

[rubius2008]

нет.
для -1 в степени введи отдельную переменную (например, z) и внутри цикла добавь

z:=-z;

тогда твое выражение будет

s:=z/sqr(i)

не забудь правильно, до цикла определить значение z (-1 или 1, зависит от последовательности вычислений в цикле).
кстати зачем цикл для вычисления всех элементов, надо же только какой-то n-ый элемент найти? если так, то цикл нужен лишь для возведения -1 в степень.

[Devil Jin]

Сообщение от rubius2008

нет.
для -1 в степени введи отдельную переменную (например, z) и внутри цикла добавь

z:=-z;

тогда твое выражение будет

s:=z/sqr(i)

не забудь правильно, до цикла определить значение z (-1 или 1, зависит от последовательности вычислений в цикле).
кстати зачем цикл для вычисления всех элементов, надо же только какой-то n-ый элемент найти? если так, то цикл нужен лишь для возведения -1 в степень.

этот цикл по идее должен считать все значения выражения при i от 1-го до 10.
и как вообще получить правильно -1 в степени n+1?