■

さっきの続き。
よく考えたら、 http://www.din.or.jp/~ohzaki/perl.htm#File_Random と同じアルゴリズムで、保存領域を複数にして、更新される保存領域もランダムに選ぶようにすれば、nの数が異様に大きい時は早くなる事に気付いた。
とりあえず、「そういう手もある」と気付いた時点で満足してしまったので、コードは省略。