def calc(rs)
  length = rs.first + rs.last

  for i in 1...rs.size
    left = rs[i - 1]
    right = rs[i]
    length += Math.sqrt((left + right)**2 - (left - right)**2)
  end
  length
end

while line = gets
  length, *rs = line.chomp.split.map(&:to_i)
 
  answer = :NA
  rs.permutation(rs.size).each do |rs|
    if length >= calc(rs)
      answer = :OK
      break
    end
  end

  puts answer
end