Question

помогите пожалуйста, писать в паскаль​

Answer 1

// PascalABC.NET

begin

 var n := ReadInteger('N =');

 SeqGen(n + 1, i -> 1/(2 * i + 1)).Sum.Print

end.