(1) A(1)〜A(10)に、1〜10の値を入れておく
(2) 以下を K＝10〜1について繰り返す：
　　(2-1) 0〜K-1の乱数をとり、Rに入れる。
　　※ここでA(R+1)の値が、重複のない乱数
　　(2-2) A(K)とA(R+1)を交換。

結果：A(1)〜A(10)に、ランダムな順番で1〜10が並んでいる。

↑こうすれば乱数が簡単にならない？亀レススマソ。