LL Golf Hole 5 - 最上位の桁を数え上げる
Posted feedbacks - Ruby
与えられた自然数までの数え上げを行います。ただし、繰り上がりが起こったときは最上位の桁のみを数え上げます。また、与えられる自然数には0以外の桁が2回以上登場してはいけません。たとえば、300を入力として与えられた場合は以下のような出力となります。
0
1
2
3
4
5
6
7
8
9
10
20
30
40
50
60
70
80
90
100
200
300
与える自然数についてはリテラルで与える、標準入力で与える、引数で与えるなどは自由とします。
※LL Future実行委員の高野光弘です。この出題は LL Future公式の出題であり、優れたものについてはLL Golfのセッションでご紹介させていただくかもしれません。ご理解の上、ご投稿ください。また、LL Futureのチケットは現在も発売中です。よろしければ、メインイベントの方にもぜひご参加ください。
1 2 3 4 5 6 | #!/usr/bin/env ruby
def f(n, m = 0)
puts m
n == m ? return : f(n, m + 10 ** (m.to_s.size - 1) )
end
f(300)
|
たしかに。grepを使ったらシンプルに。
1 | ruby -e 'p (0..300).collect{|i| i.to_s}.grep(/^[1-9]?0*$/)'
|
コマンドラインからで67バイト。
1 | puts z=0;while 1.upto(9){|i|puts((t=i*10**z)<=300?t:exit)};z+=1;end
|
皆さんのご意見を元に改良。
コマンドラインから上限を得ます。
1 | puts ("0"..ARGV[0]).grep(/^.?0*$/)
|
同じ発想でRuby
1 | "0".upto($*[0]){|$_|puts$_ if/^\d0*$/}
|
もうちょっと縮まった
1 | puts ("0"..$*[0]).grep(/^\d0*$/)
|
takano32
#7116()
[
Ruby
]
Rating1/3=0.33
与えられた自然数までの数え上げを行います。ただし、繰り上がりが起こったときは最上位の桁のみを数え上げます。また、与えられる自然数には0以外の桁が2回以上登場してはいけません。たとえば、300を入力として与えられた場合は以下のような出力となります。
与える自然数についてはリテラルで与える、標準入力で与える、引数で与えるなどは自由とします。
※LL Future実行委員の高野光弘です。この出題は LL Future公式の出題であり、優れたものについてはLL Golfのセッションでご紹介させていただくかもしれません。ご理解の上、ご投稿ください。また、LL Futureのチケットは現在も発売中です。よろしければ、メインイベントの方にもぜひご参加ください。
Rating1/3=0.33-0+
[ reply ]