Result

AC

Duration

1111ms

Code [DL]

(let* ((y (read))(x (read))(m make-string)(s (list (m (- x 1) #\*)))(k (string-join (append s (make-list (- y 2) (m (- x 2) #\ )) s)"*\n*")))(display k))

stdin

11
52

stdout

****************************************************
*                                                  *
*                                                  *
*                                                  *
*                                                  *
*                                                  *
*                                                  *
*                                                  *
*                                                  *
*                                                  *
****************************************************

stderr

;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
;;;       or pass the --no-auto-compile argument to disable.
;;; compiling /volume/CODE
;;; compiled /root/.cache/guile/ccache/2.0-LE-8-2.0/volume/CODE.go