Дано натуральное N. Найдите сумму чисел 1/3+1/5+1/7 + ... + 1 / (2 х+1)

Question

Информатика

Юдифь

6 октября, 11:32

Дано натуральное N. Найдите сумму чисел 1/3+1/5+1/7 + ... + 1 / (2 х+1)

+1

Ответы (1)

Знаете ответ на вопрос?

Мокей · Answer 1

Var n, i: word;

sum: real;

begin

write ('n = ') ;

readln (n) ;

sum : = 0;

for i : = 1 to n do

sum : = sum + 1 / (2*i+1) ;

writeln (sum:6:5) ;

end.