プログラミング学習の記録 697.3 10章(章全部で復習)の10.3(練習問題)、辞書順ソート(再帰を使ったり使わなかったり) 『初めてのプログラミング 第2版』(Chris Pine 著、長尾 高弘 訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)

開発環境

• Mac OS X Snow Leopard (OS)
• TextWrangler(Text Editor) (いずれはBBEditを入手したい！)
• Script言語:Ruby

『初めてのプログラミング 第2版』(Chris Pine　著、長尾 高弘　訳、オライリー・ジャパン、2010年、ISBN978-4-87311-469-9)の 10章(章全部で復習),　10.3(練習問題)、辞書順ソートを解いてみる。

 

辞書順ソート

再帰を使ったバージョン

コード(TextWrangler)

#!/usr/bin/env ruby def dictionary_sort words recursive_sort words, [] end def recursive_sort unsorted_array, sorted_array if unsorted_array.length <= 0 return sorted_array end min = unsorted_array.pop tmp_array = [] unsorted_array.each do |item| if item.downcase < min.downcase tmp_array.push min min = item else tmp_array.push item end end sorted_array.push min recursive_sort tmp_array, sorted_array end words = ['a','A','a','cab','bca','abc','CCC','aaa','Bbb'] puts 'ソート前' puts words puts '辞書順ソート後' puts dictionary_sort words

入出力結果(Terminal)

$ ./ruby_program.rb ソート前 a A a cab bca abc CCC aaa Bbb 辞書順ソート後 a A a aaa abc Bbb bca cab CCC

再帰を使わなかったバージョン

コード(TextWrangler)

#!/usr/bin/env ruby def dictionary_sort words sorted_array = [] while words.length > 0 tmp_array = [] min = words.pop words.each do |item| if item.downcase < min.downcase tmp_array.push min min = item else tmp_array.push item end end sorted_array.push min words = tmp_array end sorted_array end words = ['a','A','a','cab','bca','abc','CCC','aaa','Bbb'] puts 'ソート前' puts words puts '辞書順ソート後' puts dictionary_sort words

入出力結果(Terminal)

$ ./ruby_program.rb ソート前 a A a cab bca abc CCC aaa Bbb 辞書順ソート後 a A a aaa abc Bbb bca cab CCC