Информатика, опубликовано 2018-08-22 22:04:40 by Гость
Помогите пожалуйста написать простенькую программу в Паскаль(цикл с параметром) Задание: Вычислить сумму ряда до n количества значений: s=1-1/1+1/3-1/5+.......
Ответ оставил Гость
{s=1-1/1+1/3-1/5+.....}
var i,n,z:integer;
s: real;
begin
writeln(Введите n);
readln(n);
s:=1; z:=1;
for i:=1 to n-1 do
begin
z:=z*(-1);
s:=s+z/(2*i-1);
end;
writeln(s);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на