vb.net - F#、Haskell、Scala 和 Visual Basic 或其他函数式编程语言中两个数字文件 i/o 的简单求和

Question

我正在为算法竞赛开发在线评委。我想包括对许多编程语言的支持，但我不知道所有的语言。我必须制作测试源，但我不知道所有这些语言。

我想要这段代码的等价物:

#include <stdio.h>

int main () {
    int a, b;

    freopen("input.txt", "r", stdin);
    freopen("output.txt", "w", stdout);

    scanf("%d%d", &a, &b);
    printf("%d", a + b);

    return 0;
}

在这种编程语言中。

我想从文件 input.txt 中读取两个数字，每个数字在一行，并将它们的总和写入输出文件 output.txt

谢谢。

编辑 请不要告诉我 Visual Basic .NET 不是函数式语言。我知道。

Answer 1

haskell :

main = do
    [astr, bstr] <- fmap lines (readFile "input.txt")
    writeFile "output.txt" $ show (read astr + read bstr)

或者对所有行求和:

main = writeFile "output.txt" . show . sum . map read . lines =<< readFile "input.txt"