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

0 голосов
20 просмотров

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


Информатика (16 баллов) | 20 просмотров
Дан 1 ответ
0 голосов

// F#
[]
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

(1.4k баллов)