# include <iostream>
using namespace std;
long long a[100010],ans;
int main(){
    long long n;
    cin>>n;
    for(int i=0;i<n;i++){
        cin>>a[i];
    }
    long long U=(1<<n)-1;
    long long S,T;
    for(S=0;S<=U;S++){
        if(__builtin_popcount(S)==2){               //先找到两根长度相等的木棒
            long long i,x,y;
            for(i=0;i<n;i++){                       //先找一根
                if((1<<i)&S) {x=a[i];break;}  
            }
            i++;
            for(;i<n;i++){                          //继续找
                if((1<<i)&S) {y=a[i];break;}
            }
            if(x==y){                               //判断两根长度是否相等
                for(T=0;T<=U;T++){
                    if(__builtin_popcount(T)==2){   //找另外两根
                        if(T&(S^U)){
                            long long j,z,w;
                            for(j=0;j<n;j++){
                                if((1<<j)&T) {z=a[j];break;}
                            }
                            j++;
                            for(;j<n;j++){
                                if((1<<j)&T) {w=a[j];break;}
                            }
                            if(z+w==x) ans++;
                        }
                    }
                }
            }
        }
    }
    cout<<ans;
    return 0;
}