Задать вопрос Регистрация
Помочь другим

  • Вычислите сумму первых n элементов

    1-1/2+1/3-1/4+1/5-1/6+....

Ответы 1

  • var i,n,s:nteger;

    BEGIN

      read(n);

      for i := 1 to n do

        if i mod 2 = 0 then s:= s-1/i;

        else s:= s+1/i;

     writeln(s);

    END.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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