Ответ(ы) на вопрос:
Гостьvar i: longint;
n: integer;
s: real;
begin
write('число членов ряда (от 2 до 15): ');
readln(n);
if n>15 then n:=15;
for i:=1 to n do
s:=s+power(2,2*i-1)/(2*i-1);
writeln('сумма ряда (n = ',n,') = ',s:12:4);
end.
Не нашли ответ?
Похожие вопросы