Дано натуральное N. Найдите сумму чисел 1/3+1/5+1/7+...+1/(2х+1)
Ответы на вопрос
Ответил ShirokovP
0
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.
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.
Ответил Аноним
0
Натуральное N, то есть не до нуля, а до 1
Ответил ShirokovP
0
for i := n downto 1 do ?
Новые вопросы