1001コメント412KB

CommonLisp初心者スレ

■ このスレッドは過去ログ倉庫に格納されています

0314デフォルトの名無しさん

NGNG

(defun func (lst &aux (tmp 0))
(if (null lst) tmp (func (cdr lst) (+ tmp (car lst)))))

■ このスレッドは過去ログ倉庫に格納されています