如何用F#处理Kattis平台的简单输入？求解代码错误问题

你的代码错误原因 #

你用Console.Read()的问题在于，它读取的是输入字符的ASCII码值，而不是实际输入的整数：

• 比如输入12 3，Console.Read()只会读取第一个字符'1'的ASCII码49，第二个Console.Read()读取空格的ASCII码32，完全不符合题目要求的两个整数比较。
• 就算输入是单个数字，比如5 3，虽然ASCII码53>51能得到正确结果，但这是巧合，题目允许输入任意整数（包括多位数），所以这种写法本质错误。

正确的代码实现 #

针对“Which is greater”这道题，正确的做法是读取整行输入，分割成两个字符串后转换为整数再比较：

open System

let input = Console.ReadLine().Split()
let a = int input.[0]
let b = int input.[1]
printfn "%d" (if a > b then 1 else 0)

Kattis中F#输入输出的常见处理方式 #

1. 读取单个整数 #

如果题目要求输入单个整数：

let n = Console.ReadLine() |> int
printfn "%d" (n * 2)

2. 读取多行输入 #

比如需要读取N行，每行一个整数：

let n = Console.ReadLine() |> int
for _ in 1..n do
    let num = Console.ReadLine() |> int
    printfn "%d" (num + 1)

3. 读取一行多个数值 #

如果一行有多个用空格分隔的数值，除了Split()，还可以用模式匹配简化：

match Console.ReadLine().Split() with
| [|a; b|] ->
    let x = int a
    let y = int b
    printfn "%d" (max x y)
| _ -> () // 处理异常输入，Kattis通常保证输入符合要求

注意事项 #

• Kattis对输出格式要求严格，不要输出多余的空格、换行或提示信息，完全按照题目要求输出即可。
• 尽量使用printfn或printf控制输出，避免Console.WriteLine的潜在格式问题（两者大部分情况一致，但printf系列更贴合F#的函数式风格）。

内容的提问来源于stack exchange，提问作者morten