var
  a: int64;
  s: string;

begin
  ReadLn(s);
  write(s[3], ' ', s[s.Length], ' ', s[s.Length], ' ');
end.