Дано натуральное число N. Вычислить: S= 1+1/2+1/3+1/4+...+1/N. (программа Паскаль)

Catcat123dogdog Catcat123dogdog    2   16.04.2019 23:00    11

Ответы
overlord14 overlord14  16.04.2019 23:00
var
  res:real;
  i,n:integer;
begin
  readln(n);
  res:=1;
  for i:=2 to n do
    res:=res+1/i;
  writeln(res)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы