n = gets.chomp.to_i
l = gets.chomp.split.map(&:to_i)
l.sort!

ans = 0

def ok?(a,b,c)
  # p 'called'
  if a < b+c && b<c+a && c<a+b
    true
  else
    false
  end
end
def ok1?(a,b,c)
  # p 'called'
  # p ['ok1',a,b,c, a < b+c && b<c+a]
  if a < b+c && b<c+a
    true
  else
    false
  end
end
def ok2?(a,b,c)
  # p 'called'
  # p ['ok2',a,b,c,c<a+b]
  if c<a+b
    true
  else
    false
  end
end


0.upto(n-3).each do |i|
  (i+1).upto(n-2).each do |j|
    left = 0
    lmin = j+1
    lmax = n-1
    while true
      lmid = (lmin + lmax)/2
      # p ['l',lmin, lmid, lmax]
      if ok1?(l[i],l[j],l[lmid])
        lmax = lmid
      else
        lmin = lmid
      end
      if lmax - lmin <= 1
        left = ok1?(l[i],l[j],l[lmin]) ? lmin : lmax
        break
      end
    end

    right = 0
    rmin = j+1
    rmax = n-1
    while true
      rmid = (rmin + rmax)/2
      # p ['r',rmin, rmid, rmax]
      if ok2?(l[i],l[j],l[rmid])
        rmin = rmid
      else
        rmax = rmid
      end
      if rmax - rmin <= 1
        right = ok2?(l[i],l[j],l[rmax]) ? rmax : lmin
        break
      end
    end
    # p ['---------', i, j, '', left, right]
    # p ['---------', l[i], l[j], '', l[left], l[right]]
    if ok1?(l[i],l[j],l[left]) && ok2?(l[i],l[j],l[right])
      ans += right - left + 1
    end
  end
end

puts ans
