We use cookies to ensure you have the best browsing experience on our website. Please read our cookie policy for more information about how we use cookies.
  1. Prepare
  2. Functional Programming
  3. Recursion
  4. String-o-Permute
  5. Discussions

String-o-Permute

  • Benjamin_A_Luna
     + 0 comments

    An F# Solution

    let rec change (t:string) x =
    if x = t.Length-2 then
        Console.WriteLine(t.[x+1].ToString() + t.[x].ToString())
    else
        Console.Write(t.[x+1].ToString() + t.[x].ToString())
        change t (x+2)

[<EntryPoint>]
let main argv =
    let n = Console.ReadLine() |> int
    let c = [for i = 1 to n do yield Console.ReadLine()]
    c |> List.iter(fun x -> change x 0)
    0