let () =
    let s = stdin.ReadLine ()

    "abcdefghijklmnopqrstuvwxyz"
    |> Seq.zip s
    |> Seq.find (fun (c1, c2) -> c1 <> c2)
    |> fun (c1, c2) -> (printfn "%cto%c" c2 c1)