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

Определить значение суммы S = 1/2 + 1/4 + … +1/72. паскаль плиз
Гость
Ответ(ы) на вопрос:
Гость
var s: real; i: integer; begin s := 0; for i := 1 to 36 do s := s + 1 / (i * 2); writeln('S = ', s); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы