選択ソート
Scheme での実装を以下に示す。