Question

Написать в pascalABC. Вычислите значение суммы N членов следующего ряда: k/1 + k/3 + k/5..... N>0, K>0 - вводится с клавиатуры.

Answer 1

Решение на PascalABC.NET:

var  

 N: integer;

 K: double;

begin

 write('Введите N:');

 readln(N);

 write('Введите K:');

 readln(K);

 write(

   System.Linq.Enumerable

     .Range(0, N)

     .Sum(t -> K / (1 + t *2)));

end.