Google Code Jam ついった見てたらLISPで参加してる人がちらほら見えたので自分もやってみた。初参加。 結果はA,B,Cそれぞれsmall, large両方正解で70点。Dはsmallで弾かれて0点。 Problem A. Bot Trust 自分のターンでない時には行動ポイントを貯め、自分のターンが来たらポイントを消費して瞬間移動 & 足りなければ1歩ずつ移動、というルールに脳内変換して解いた。 (defmacro do-problems (&body body) `(loop for #0=#:i from 1 to (read) do (format t "~&Case #~D: " #0#) (progn ,@body))) (defmacro n-of (n form) `(loop repeat ,n collect ,form)) (do-problems (l