Problem:
Score : 400 points

Problem Statement

Takahashi has N sticks that are distinguishable from each other. The length of the i-th stick is L_i.

He is going to form a triangle using three of these sticks. Let a, b, and c be the lengths of the three sticks used. Here, all of the following conditions must be satisfied:

a < b + c

b < c + a

c < a + b

How many different triangles can be formed? Two triangles are considered different when there is a stick used in only one of them.

Constraints

All values in input are integers.

3 \leq N \leq 2 \times 10^3

1 \leq L_i \leq 10^3

Input

Input is given from Standard Input in the following format:

N
L_1 L_2 ... L_N

Constraints

Print the number of different triangles that can be formed.

Sample Input 1

4
3 4 2 1

Sample Output 1

1

Only one triangle can be formed: the triangle formed by the first, second, and third sticks.

Sample Input 2

3
1 1000 1

Sample Output 2

0

No triangles can be formed.

Sample Input 3

7
218 786 704 233 645 728 389

Sample Output 3

23

Solution in Rust (1.15.1) (judge verdict: Wrong Answer)

use std::cmp::{max, min};
use std::io::{stdin, Read};
use std::str::FromStr;

// https://qiita.com/tubo28/items/e6076e9040da57368845
fn read<T: FromStr>() -> T {
    let stdin = stdin();
    let stdin = stdin.lock();
    let token: String = stdin
        .bytes()
        .map(|c| c.expect("failed to read char") as char)
        .skip_while(|c| c.is_whitespace())
        .take_while(|c| !c.is_whitespace())
        .collect();
    token.parse().ok().expect("failed to parse token")
}

#[allow(dead_code)]
fn main() {
    let n = read::<usize>();
    let mut ll = (0..n).map(|_| read::<usize>()).collect::<Vec<_>>();
    ll.sort();
    let mut table = vec![0; 2 * 10usize.pow(3)];
    let mut start = 0;
    let mut count = 0;
    for i in 0..n {
        for j in start..ll[i] {
            table[j] = count
        }
        count += 1;
        table[ll[i]] = count;
        start = ll[i] + 1;
    }

    let mut ans = 0;
    for ai in 0..n - 2 {
        for ci in 0..n - 2 {
            let ci = n - ci - 1;
            let a = ll[ai] as i64;
            let c = ll[ci] as i64;

            let lower_b = max(a - c, c - a);
            let upper_b = a + c - 1;
            let lower_b = max(ll[ai], lower_b as usize);
            let upper_b = min(ll[ci] - 1, upper_b as usize);
            if lower_b < upper_b {
                ans += table[upper_b] - table[lower_b];
            }
        }
    }
    println!("{}", ans)
}