Информатика, опубликовано 2018-08-22 23:46:52 by Гость

Написать программу, которая вычисляет сумму первых n членов ряда 1+1/3+1/5+1/7...1/n через опреатор for to do

Ответ оставил Гость

Var n,i:integer; s:real;
Begin
 write(n=); readln(n);
 s:=0;
 for i:=1 to (n*2)-1 do
   if (i mod 2)0 then s:=s+1/i;
 writeln(s=,s:0:2);
End.

Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.

Форма вопроса доступна на полной версии этой страницы.