(use scheme.base)
(use scheme.read)
(use scheme.write)

(define yuki2049
  (let*
    (
      (n (read))
      (s (read-string n))
    )
    (write (substring s 2 n))
    (newline)
  )
)