Дано натуральное N. Вычислить S=1+1/22-1/23+…(-1)N/2N (программу написать)

Вопрос пользователя:

Дано натуральное N. Вычислить S=1+1/22-1/23+…(-1)N/2N (программу написать)

Илюха отвечает:

s := 0

for i := 1 to n do

  if i mod 2 = 1 then

    s := s – 1/2/n

  else

    s := s + 1/2/n;