Question

我正在编写一个问题： https://www.hackerrank.com/challenges/string-mingling/problem

但我不知道如何改变＆＃34; Fsharp不要自动＆＃34; \ n＆＃34; ＆＃34; 这是我的代码：

open System
let mutable p = Console.ReadLine()
let mutable q = Console.ReadLine()

let ans = ResizeArray<char>()
let mutable n = p.Length

for i in 0..(n-1) do 
    ans.Add(p.[i])
    ans.Add(q.[i])
ans |> Seq.iter (fun x -> printfn("%c") x)

[<EntryPoint>]
let main argv =
    0 // return an integer exit code

Answer 1

使用printf代替printfn，以避免自动添加新行。

一般情况下，将打印等副作用移到程序边缘会更好，这样您最后只需要打印一次。例如：

Seq.map2 (fun c1 c2 -> String[|c1; c2|]) p q
|> String.concat ""
|> printfn "%s"

如何改变＆＃34; Fsharp不要自动＆＃34; \ n＆＃34; ＆＃34;

1 个答案: