2007-07-06から1日間の記事一覧

キャッシュを使う

キャッシュとかいっても計算した値を保存しておくというだけです.Perlの場合,ハッシュで保存するのが楽です.第項を計算したら,その結果ををキーとするハッシュの値として保存しておくだけです.このハッシュをグローバル変数にしてしまっても構わないの…

フィボナッチの呼び出し回数を数えてみる

単純な再帰でフィボナッチを計算させると,とても時間がかかります. my $count; sub fib1{ my $n = shift; $count++; return 0 if $n==0; return 1 if $n==1; return fib1($n-1)+fib1($n-2); } なんてすれば,fib1が何回呼ばれるか数えることもできますが,…