Вычислить сумму 1-1/2+1/3-...(-1)^n+1*1/n условный оператор и операцию возведение в степень ?
Вычислить сумму 1-1/2+1/3-...(-1)^n+1*1/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
Не нашли ответ?
Похожие вопросы