Вычислить сумму 1-1/2+1/3-...(-1)^n+1*1/n условный оператор и операцию возведение в степень не использовать. Нужно блок схему и программу.

$/displaystyle s=1- /frac{1}{2}+ /frac{1}{3}+/cdots +(-1)^{n+1} /frac{1}{n}; // c_1=1;/quad c_n=-c_{n-1}; /quad s=/sum_{i=1}^n/frac{c_i}{n}$

// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
var c:=1.0;
var s:=0.0;
for var i:=1 to ReadInteger(n=) do begin
s+=c/i; c:=-c
end;
Writeln(s=,s)
end.

Тестовое решение:
n= 7
s=0.759523809523809

Оцени ответ

Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Найти другие ответы