Question

Program z;
var
s:real;
i,x,n:integer;
begin
writeln('ввод x,n');
readln(x,n);
for i:=n to 1 do
s:=s*(((-1)*exp(i+1)*ln(1))/exp(i+ln(2*x+1)));
writeln('ответ s=',s);
end.

По какой причине S ,независимо то значений X и N, получается равным нулю?

Answer 1

Так у тебя же S не вводиться с клавиатуры. Как тебе уже писали в ячейке памяти где находиться переменная S по-умолчанию имеется какое-то значение. Не обязательно это должен быть 0. Сделай следуйщее:
- задай значение переменной S=1; По скольку первое значение S в примере не будет равен 0. Но если ты будешь делать какой-то цикл, то значение S ,будет каждый раз меняться и не будет равно 0. 

Answer 2

Если задать S за 1, то цикл даже не будет начинаться. Программа будет выводить S:=1 как окончательный ответ.

Answer 3

В цикле мы не выводим S, а выводим после цикла. Прогер.... Ты проверь а потом что то пиши !