Ruby - sort(whileループ)

初めてのプログラミング 第2版
Chris Pine (著) 長尾 高弘 (訳)

開発環境

• OS X Lion - Apple(OS)
• TextWrangler(Text Editor) (BBEditの機能制限無料版、light版)
• Script言語:Ruby

『初めてのプログラミング 第2版』(Chris Pine　著、長尾 高弘　訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)の 10章(章全部で復習), 10.2(通過儀礼としてのソート)、再帰を解いてみる。

その他参考書籍

• 『プログラミング言語 Ruby』David Flanagan, まつもと ゆきひろ　著 、卜部 昌平　監訳、長尾 高弘　訳、オライリー・ジャパン、2009年、ISBN978-4-87311-394-4)
• Rubyクックブック ―エキスパートのための応用レシピ集

通過儀礼としてのソート(whileループ)

コード(TextWrangler)

sample.rb

#!/usr/bin/env ruby1.9
#-*- coding: utf-8 -*-

def sort some_array
  a = Array.new(some_array)
  sorted_a = []
  while a.length != 0
    min = a.pop
    tmp = []
    i = 1
    a.each do |item|
      if item < min
        tmp.push min
        min = item
      else
        tmp.push item
      end
    end
    sorted_a.push min
    a = tmp
  end
  sorted_a
end

a1 = [5,1,4,2,3]
a2 = %w[e a d b c]
[a1,a2].each do |a|
  sorted_array = sort a
  puts "ソート前: #{a.join(",")}"
  puts "ソート後: #{sorted_array.join(",")}"
end

入出力結果(Terminal)

$ ./sample.rb
ソート前: 5,1,4,2,3
ソート後: 1,2,3,4,5
ソート前: e,a,d,b,c
ソート後: a,b,c,d,e
$