Вычислить сумму целых чисел кратных 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
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
