Self-describing numbers: Difference between revisions

Content added Content deleted
(→‎{{header|Ruby}}: shorter by using newer methods)
Line 1,818:
<lang ruby>def is_self_describing?(n)
digits = n.to_s.chars.collect {|digit| digit.to_i}
digits.each_with_index.all?{|d, i| digits.count(i) == d}
len = digits.length
count = Array.new(len, 0)
 
digits.each do |digit|
return false if digit >= len
count[digit] = count[digit] + 1
end
 
digits.eql?(count)
end
 
Line 1,835 ⟶ 1,827:
21200
3211000</pre>
 
=={{header|Run BASIC}}==
<lang Runbasic>for i = 0 to 50000000 step 10
Retrieved from "https://rosettacode.org/wiki/Self-describing_numbers"