//Nacional 2007?
#include <stdio.h>

int S[8000];

int main(){
	int i, k, m, r=0;
	int N;
	scanf("%d", &N);
	for(i=0;i<N;i++)
		scanf("%d", &S[i]);
	for(i=0;i<N;i++){
		for(k=i-1, m=i+1; k>=0 && m<N; ){
			if(S[i]-S[k]<S[m]-S[i]){
				k--;
			}else if(S[i]-S[k]>S[m]-S[i]){
				m++;
			}else{
				r++;
				k--;
				m++;
			}
		}
	}
	printf("%d\n", r);
	return 0;
}