くだすれDelphi(超初心者用)その48

くだすれDelphi(超初� ..

113:Delﾌｻｷﾞｺ ◆A6VzDeLphI
08/11/15 00:38:14
　　∧,,∧　　たぶんね
　ミ,,ﾟ 3 ﾟ彡　　遅いかも>>103さん、105さん
　ﾐ　つ旦)~~
～と,,,~),,~)　

いや、パフォーマンスを気にする必要が無い場面は
多々あるんだと思うだが、この場合、

1000個目の乱数を出すために大変だよ。
出力済みの999個は重複しているから。
何を出力してもほとんどははじかれる。

こういう時には>>88さんのいうように
リストでも配列でもいいんだけど
1　2　3　4　5　6　…
を用意しておいて、
1番目の箱を乱数1-1000で決めた他の番号の箱と中身を入れ替えて、
2番目の箱を乱数1-1000で決めた他の番号の箱と中身を入れ替え。。
と、1番目から1000番目の箱を入れ替えていくのがセオリーかと。

>「関数内関数を匿名関数型の変数に代入」ができると、さらなる可能性
そうなの？
面白い事やってますね。

次ページ