Вычислите значение суммы n членов следующего ряда: k/1 + k/3 + k/ n> 0, k> 0 - вводится с клавиатуры

PascalABC.NET 3.4.2, сборка 1806 от 30.09.2018Внимание! Если программа не работает, обновите версию!

begin

 var (n,k):=ReadInteger2('Введите n и k:');

 (SeqGen(n,t->1/(2*t+1)).Sum*k).Println

end.

using System;

using System.Linq;

namespace t29781772

{

   class Program

   {

       static void Main()

       {

           Console.WriteLine("Введите N и K:");

           var N = int.Parse(Console.ReadLine());

           double K = int.Parse(Console.ReadLine());

           Console.WriteLine(Enumerable

               .Range(0, N)

               .Select(t => K / (1 + t * 2))

               .Sum());

       }

   }

}