Вычислить сумму целых чисел кратных 4 в интервале от 0 до 200
Вычислить сумму целых чисел кратных 4 в интервале от 0 до 200
Гость
Ответ(ы) на вопрос:
Гость// F#
[]
let main argv =
let sum =
[0..200]
|> Seq.where (fun x -> x % 4 = 0)
|> Seq.fold (fun sum x -> sum + x) 0
System.Console.WriteLine sum
System.Console.ReadKey true |> ignore
0
Не нашли ответ?
Похожие вопросы