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

aizhanashoznweb aizhanashoznweb    1   26.08.2019 23:00    0

Ответы
mondy358 mondy358  05.10.2020 21:45
Var s: real;
i: integer;
begin
s := 0;
for i := 1 to 36 do
s := s + 1 / (i * 2);
writeln('S = ', s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика