fibbuzz?

钱柜娱乐_钱柜娱乐平台_钱柜娱乐777(唯一)官方网站


まずフィボナッチ数を理解するのに5分かかりました。
実装に5分かかりました。
codegolfに20分かかりました。


windowsperl -eで動くようにしたものがこちら。

$f{1}=1;print+($f{$_}?[$f{$_+$f{$_}}=$_,fib]->[1].($_%5?'':buzz):$_%5?$_:buzz).chr 10for(1..100);


連想配列で次のフィボナッチ数を記録していきます。センスない。