200229

Crystal


A332800(1)

Crystal で計算してみた。途中で計算が止まる。

def a332800(n)
  return 1 if n == 0
  a = (1..n).map{|i| [i]}
  len = 1
  while len < n
    b = Array(Array(Int32)).new
    a.each{|c|
      (1..n).each{|num|
        if !c.includes?(num)
          i = c.clone + [num]
          if len > 1
            if (i[-3] % i[-2]) <= (i[-2] % i[-1])
              b << i
            end
          else
            b << i
          end
        end
      }
    }
    a = b
    len += 1
  end
  a.size
end

(0..20).each{|i| p a332800(i)}

出力結果
1
1
2
4
9
21
44
109
241
530
1176
3180
6456
14835
34672
81877
179434
479275
Program was killed