Question

1.дано натуральное чисто N. Вычислить: s=1+1/3+1/5+1/7+.....1/2N+1
Помогите пжл

Answer 1

// F#
[<EntryPoint>]
let main argv =
    let rec count n =
        match n with
        | 0 -> 1.0
        | n -> 1.0 / (2.0 * (float n) + 1.0) + count (n-1)
    let n = System.Console.ReadLine() |> System.Int32.Parse
    let s = count n
    printf "Result: %f" s
    System.Console.ReadKey true |> ignore
    0