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

    через оператор for to do

Ответы 1

  • 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.
    • Автор:

      macintosh
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years