Определить значение суммы S = 1/2 + 1/4 + … +1/72.
паскаль плиз

var s: real;i: integer;begins := 0;for i := 1 to 36 dos := s + 1 / (i * 2);writeln('S = ', s);end.