[[Problem 1382]] -合成数のところだけ棒を立てる問題。 まあ真面目に素数判定する人はいないだろうと思いましたが、29Bってなんぞ… -- zephoria &new{2012-04-01 (日) 22:27:07}; -b(X):lsrb(X-1)rsl a(X,Y):sb(X)sa(X+2,Y-1)b(X+1)a(X+2,3) rssa(4,3) -- zephoria &new{2012-04-01 (日) 23:05:12}; -素数?と思ったけど流石にそんなことしません。 もちろんIF文も使いません。 1進み長さ増やす、または、2進み長さ2増やす。 1,1,1,2と育てて再帰に乗せればよろしい。 初期位置周辺が色々と困ったが、特殊な初項で解決。 a(X,Y,A,B,C,D):XlXYla(YX,sA,B,C,D,A) a(sl,sss,s,s,,) -- mas &new{2012-04-01 (日) 23:54:14}; -1,1,1,2じゃなくて1,1,2,2ですな。 3,2,2,1,1,2,2,1,1,2,2,1,1,と出来れば解決でーす。 -- mas &new{2012-04-01 (日) 23:55:15}; -31B a(X,Y,Z,A,B):sYlXlXa(sZX,Z,A,B,Y) rssa(ssssl,,s,s,) -- pasta &new{2012-04-02 (月) 00:00:26};