【AtCoder ABC417A】A Substring（Common Lisp）

1. 問題

• B – A Substring

2. コード

subseqは、sequence の start+1 から end までの部分列を取るので、end に後ろからの数を与えました。

(defun substring (str a b)
  (subseq str a (- (length str) b)))

(defun main ()
  (let* ((n (read))
	 (a (read))
	 (b (read))
	 (str (read-line)))
    (declare (ignore n))
    (princ (substring str a b))))

#-swank
(main)
Code language: Lisp (lisp)