Составить на Паскале программу для вычисления суммы ряда (см. ...
Ответ
var s,a: real;
n,i:integer;
begin
s:=0;
readln(n);
for i:=1 to n do begin
a:=1/i;
s:=s+a;
end;
writeln(s:0:5);
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
18.12.2022