program killleft (input, output) ;
  var
    i : integer ;
    s : string[252] ;
  begin
    i := integer(cline(1)) ;
    while not eof do
      begin
        readln (s) ;
        writeln (substr(s, i, 251 - i))
      end
  end.
