gets
$<.map{a=[0,0]+gets.split.group_by{|i|i}.values.map(&:size)
p (0..33).find{|i|a.sort![-3]<1||!(1..3).map{|j|a[-j]-=1}}}