Question

Найти сумму выражения 1 + 1/3 + 1/5 +... до N (N - количество слагаемых)
На языке Pascal
СРОЧНО!! ДАЮ 80 БАЛЛОВ!! ​

Answer 1

Если я правильно понял- сумма идёт не до числа N, а до количества слагаемых, равного N   (а в знаменателях- ряд нечётных чисел).

Тогда вот программа:

var

a,N: integer;

s: real;

begin

write('N= ');

read(N);

for a:=1 to N do

s:=s+1/(2*a-1);

write(s)

end.