Google Code Jam Qualification Round 2011参加した。 もちろん使用言語は Common Lisp A Bot Trust オレンジが仕事している間もブル一は仕事できる。まずは、 O の仕事と B の仕事をグルーピングしよう。 loop で書きかけたら、何だか書きにくい。再帰で書く。 あ、だめだ。 B 1 B 2 と連続していたら、O が仕事している間にできるのは、 B 1 の分だけだ。 (setf prev-sec 0) が必要。 ボタンを押す分を足すの忘れてる。 1+ 追加。 2ヵ所で (if (eq curr-robot 'o) とか判定してるのきたないな。。。ま、いいか。 うん、動いた。よさそう。 入力は、リーダがあってよかった。 Small も Larg もかわらないね。 ;;;; Google Code Jam ;;;; Qualification Round 2011 ;;;; A Bot Trust ;;;; Com
