RosettaCodeData/Task/A+B/F-Sharp/a+b.fs

10 lines
162 B
Forth

open System
let SumOf(str : string) =
str.Split() |> Array.sumBy(int)
[<EntryPoint>]
let main argv =
Console.WriteLine(SumOf(Console.ReadLine()))
0