По данному натуральному значению n вычислите 1+1/3+1/5+1/7+...+1/2n+1 на вход программе подаётся натуральное число n меньше 100000
По данному натуральному значению n вычислите
1+1/3+1/5+1/7+...+1/2n+1
на вход программе подаётся натуральное число n<100000
Гость
Ответ(ы) на вопрос:
ГостьVar N:longint;
S:real;
Begin
Write('N = ');Read(N);
S:=0;
For N:= 0 to N do
S:=S+1/(2*N+1);
Write('S = ',S);
End.
Не нашли ответ?
Похожие вопросы