エンジニアのソフトウェア的愛情

または私は如何にして心配するのを止めてプログラムを・愛する・ようになったか

QuickSortの実装を忘れた…

わけあって、ソートのプログラムを書こうとしたんですが。
あれ、C/C++でどうやって実装するんだっけ?

こことか読んで、勉強のしなおしが必要です。


Haskellならやりたいことをそのまま書き連ねるだけなので楽でいいのに…。

qsort []     = []
qsort (a:as) = (qsort [ x | x <- as, x < a]) ++ a:(qsort [ x | x <- as, a <= x])

main = getContents >>= putStrLn.unwords.(map show).qsort.(map (read::String->Integer)).words