f# - 在 f# 中读取未知行数

Question

假设我有 n (在这种情况下为 7 个)输入给定

10

20

30

40

50

60

70

如何读取所有输入并将它们存储在列表/数组中？
我试过这个，

let inputList = [
    while (let line = Console.ReadLine()) <> null do
        line |> int
]

这个想法是阅读，直到我得到一个空行。
但我收到以下错误，

Block following this 'let' is unfinished. Expect an expression.

Answer 1

要以功能样式执行此操作，您可以使用 Seq.initInfinite从控制台创建序列。
然后，当您使用 Seq.takeWhile 获得空值时，您需要终止此列表。 .除此之外，您可以使用所有 Seq可用的模块功能包括Seq.toList .

let read _ = Console.ReadLine()
let isValid = function null -> false | _ -> true
let inputList = Seq.initInfinite read |> Seq.takeWhile isValid |> Seq.toList