0 голосов
21 просмотров

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

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

от (61 баллов) в категории Информатика

1 Ответ

0 голосов
от Доцент (53.1k баллов)
 
Лучший ответ

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.

Добро пожаловать на сайт Ответы онлайн, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...