let () = read_line () |> String.mapi (fun i c -> (Char.code c - Char.code 'A' - ((i + 1) mod 26) + 26) mod 26 + Char.code 'A' |> Char.chr) |> print_endline