慢慢算

來源: 東瓜太郎 於 2011-01-28 13:29:54 [] [舊帖] [給我悄悄話] 閱讀數 : (168 bytes)

perl -e 'while ($n = $i * ++ $i) {print "$n\n" if not length($n) % 2 and reverse ($n) == $n}'
698896
637832238736

。。。

接下來慢慢跑吧

請您先登陸，再發跟帖！