(use srfi-42) ;; yukicoder No.9008(空白区切り)でもNo.9009(改行区切り)でも同じコードで通る ;; 内包表記による解法 ;; 単に和を求めるだけなら,sum-ecを使ってもよいが ;; ここではリストに入力値を格納する練習のためにlist-ecによった ;; 当初は (define (main args) ...)としていたがRuntime Error (define (solve) (let* ((n (read)) (xs (list-ec (:range v n) (read)))) (print (apply + xs)))) (solve)