Знайти суму n елементів пслідовності: 1, -0.5, 0.25, -0.125, … n - натуральне число, вводиться з клавіатури.

Результат вивесті з шістьма знаками після коми.

Программа на языке PascalABC.NET:

begin var s: real:= 0; var n: integer:= readInteger(); for var i: integer:= 0 to (n-1) do if(i mod 2 > 0) then s:= s-power(2,-i) else s:= s+power(2,-i); writeln(s:0:6); end.

Задание выполнено!