Mr.Tの場所

特攻野郎Aチームじゃないよー

ホーム 連絡をする 同期する ( RSS 2.0 ) Login
投稿数  253  : 記事  0  : コメント  3683  : トラックバック  52

ニュース

  • 性別:男
  • 猫1:まる
  • 猫2:もろ
  • 猫3:にゃん左部郎
  • タバコ:男は黙ってJPS
[わんくま同盟] C#, VB.NET 掲示板

書庫

日記カテゴリ

Mr.Tです、こんにちは。

ネタ元1:負けるもんか

ネタ元2:ソートが熱いらしいので

 

ソートは実は苦手なのです。

だからVBに毒されたの脳みそだと、こんなことを考えてみたりします。フハハハ

 

前提条件がちと、狭いのが玉に瑕。

Sub Main()

    '与えられるソート対象値は、正の整数でなおかつ、ダブリがないことが前提
    'あんまり大きい数値も不可にしたい、あ、あと、0は配列初期値だから、0の値はソート対象にはならねえ
    'でもって、「ソート」なんかしない。
    Dim 対象配列() As Decimal = New Decimal() {100, 15, 20, 999, 1024, 1, 5}
    Dim 出力配列() As Decimal = New Decimal() {}


    For Each sItem As Decimal In 対象配列
        If UBound(出力配列) < sItem Then
            ReDim Preserve 出力配列(sItem)
        End If
        出力配列(sItem) = sItem
    Next

    For Each sItem As Decimal In 出力配列
        If sItem > 0 Then
            Console.WriteLine(sItem)
        End If
    Next
End Sub
投稿日時 : 2008年7月8日 10:23

コメント

# re: ソートなんかしていないんですけど 2008/07/08 10:59 ネタ好き未記入
これは凄い発想です。
こんな事思いつきませんでした。

# re: ソートなんかしていないんですけど 2008/07/08 11:06 επιστημη
ソートしてますよー。
「ビン・ソート」と呼ばれるアルゴリズムですねぃ。
Ο(N)なのでソート中最速。データを選ぶのが玉にキズ。


# re: ソートなんかしていないんですけど 2008/07/08 11:43 Mr.T
>「ビン・ソート」と呼ばれるアルゴリズムですねぃ。
名前までは知らなかったです。

配列長を最初に決めておけると、もっと早く
なりますね。

# re: ソートなんかしていないんですけど 2008/07/08 11:56 επιστημη
出力配列(sItem) をインクリメントすれば要素のダブりもおっけぃ♪


# re: ソートなんかしていないんですけど 2008/07/08 12:45 なにかと黒い龍
ちょうど会社の別お題でこんなのを考えてました。
最大、最小、要素数あたりがわかってれば添え字も適正に出来そうですけどね。
こんなのがでてくるからわんくまは面白いw

# re: ソートなんかしていないんですけど 2008/07/08 14:07 えムナウ
はい、テストの点数とか有限整数のときに威力を発揮するソート法です。


# そーとしていないそーと 2008/07/09 20:26 石掘る猫のBlog
そーとしていないそーと

Post Feedback

タイトル
名前
Url:
コメント