def good_triplets (arr, n):
res=0
freq=[0 for i in range(0,101)]
for i in range(n):
freq[arr[i]]=freq[arr[i]]+1
arr=list(set(arr))
n=len(arr)
if(n>=3):
for i in range(n-2):
for j in range(i+1,n-1):
for k in range(j+1,n):
s=arr[i]+arr[j]+arr[k]
tmp=0
ww=0
if(s%arr[i]==0):
tmp=tmp+1
ww=1
if(s%arr[j]==0):
tmp=tmp+1
ww=2
if(s%arr[k]==0):
tmp=tmp+1
ww=3
if(tmp==1):
a1=freq[arr[i]]
a2=freq[arr[j]]
a3=freq[arr[k]]
res=res+(a1*a2*a3)
for i in range(n-1):
for j in range(i+1,n):
val1=2*arr[i]+arr[j]
val2=2*arr[j]+arr[i]
if(val1%arr[i]!=0 and val1%arr[j]==0):
res=res+((freq[arr[i]]*(freq[arr[i]]-1))//2)*freq[arr[j]]
if(val2%arr[j]!=0 and val2%arr[i]==0):
res=res+((freq[arr[j]]*(freq[arr[j]]-1))//2)*freq[arr[i]]
else:
if(n==1):
res=0
elif(n==2):
val1=arr[0]+arr[1]+arr[0]
val2=arr[1]+arr[1]+arr[0]
if(val1%arr[0]!=0 and val1%arr[1]==0):
res=res+((freq[arr[0]]*(freq[arr[0]]-1))//2)*freq[arr[1]]
if(val2%arr[1]!=0 and val2%arr[0]==0):
res=res+((freq[arr[1]]*(freq[arr[1]]-1))//2)*freq[arr[0]]
return(res*6)
n = int(input())
arr = []
for i in range(n) :
x = int(input())
arr.append(x)
out_ = good_triplets(arr, n)
print (out_)
ZGVmIGdvb2RfdHJpcGxldHMgKGFyciwgbik6CiAgICByZXM9MAogICAgZnJlcT1bMCBmb3IgaSBpbiByYW5nZSgwLDEwMSldCiAgICBmb3IgaSBpbiByYW5nZShuKToKICAgICAgICBmcmVxW2FycltpXV09ZnJlcVthcnJbaV1dKzEKICAgIGFycj1saXN0KHNldChhcnIpKQogICAgbj1sZW4oYXJyKQogICAgaWYobj49Myk6CiAgICAgICAgZm9yIGkgaW4gcmFuZ2Uobi0yKToKICAgICAgICAgICAgZm9yIGogaW4gcmFuZ2UoaSsxLG4tMSk6CiAgICAgICAgICAgICAgICBmb3IgayBpbiByYW5nZShqKzEsbik6CiAgICAgICAgICAgICAgICAgICAgcz1hcnJbaV0rYXJyW2pdK2FycltrXQogICAgICAgICAgICAgICAgICAgIHRtcD0wCiAgICAgICAgICAgICAgICAgICAgd3c9MAogICAgICAgICAgICAgICAgICAgIGlmKHMlYXJyW2ldPT0wKToKICAgICAgICAgICAgICAgICAgICAgICAgdG1wPXRtcCsxCiAgICAgICAgICAgICAgICAgICAgICAgIHd3PTEKICAgICAgICAgICAgICAgICAgICBpZihzJWFycltqXT09MCk6CiAgICAgICAgICAgICAgICAgICAgICAgIHRtcD10bXArMQogICAgICAgICAgICAgICAgICAgICAgICB3dz0yCiAgICAgICAgICAgICAgICAgICAgaWYocyVhcnJba109PTApOgogICAgICAgICAgICAgICAgICAgICAgICB0bXA9dG1wKzEKICAgICAgICAgICAgICAgICAgICAgICAgd3c9MwogICAgICAgICAgICAgICAgICAgIGlmKHRtcD09MSk6CiAgICAgICAgICAgICAgICAgICAgICAgIGExPWZyZXFbYXJyW2ldXQogICAgICAgICAgICAgICAgICAgICAgICBhMj1mcmVxW2FycltqXV0KICAgICAgICAgICAgICAgICAgICAgICAgYTM9ZnJlcVthcnJba11dCiAgICAgICAgICAgICAgICAgICAgICAgIHJlcz1yZXMrKGExKmEyKmEzKQogICAgICAgIGZvciBpIGluIHJhbmdlKG4tMSk6CiAgICAgICAgICAgIGZvciBqIGluIHJhbmdlKGkrMSxuKToKICAgICAgICAgICAgICAgIHZhbDE9MiphcnJbaV0rYXJyW2pdCiAgICAgICAgICAgICAgICB2YWwyPTIqYXJyW2pdK2FycltpXQogICAgICAgICAgICAgICAgaWYodmFsMSVhcnJbaV0hPTAgYW5kIHZhbDElYXJyW2pdPT0wKToKICAgICAgICAgICAgICAgICAgICByZXM9cmVzKygoZnJlcVthcnJbaV1dKihmcmVxW2FycltpXV0tMSkpLy8yKSpmcmVxW2FycltqXV0KICAgICAgICAgICAgICAgIGlmKHZhbDIlYXJyW2pdIT0wIGFuZCB2YWwyJWFycltpXT09MCk6CiAgICAgICAgICAgICAgICAgICAgcmVzPXJlcysoKGZyZXFbYXJyW2pdXSooZnJlcVthcnJbal1dLTEpKS8vMikqZnJlcVthcnJbaV1dICAgICAgICAgICAgICAgIAogICAgICAgICAgICAgICAgICAgICAgICAKICAgIGVsc2U6CiAgICAgICAgaWYobj09MSk6CiAgICAgICAgICAgIHJlcz0wCiAgICAgICAgZWxpZihuPT0yKToKICAgICAgICAgICAgdmFsMT1hcnJbMF0rYXJyWzFdK2FyclswXQogICAgICAgICAgICB2YWwyPWFyclsxXSthcnJbMV0rYXJyWzBdCiAgICAgICAgICAgIGlmKHZhbDElYXJyWzBdIT0wIGFuZCB2YWwxJWFyclsxXT09MCk6CiAgICAgICAgICAgICAgICByZXM9cmVzKygoZnJlcVthcnJbMF1dKihmcmVxW2FyclswXV0tMSkpLy8yKSpmcmVxW2FyclsxXV0KICAgICAgICAgICAgaWYodmFsMiVhcnJbMV0hPTAgYW5kIHZhbDIlYXJyWzBdPT0wKToKICAgICAgICAgICAgICAgIHJlcz1yZXMrKChmcmVxW2FyclsxXV0qKGZyZXFbYXJyWzFdXS0xKSkvLzIpKmZyZXFbYXJyWzBdXQogICAgcmV0dXJuKHJlcyo2KQogICAgCm4gPSBpbnQoaW5wdXQoKSkKYXJyID0gW10KZm9yIGkgaW4gcmFuZ2UobikgOiAKICAgIHggPSBpbnQoaW5wdXQoKSkKICAgIGFyci5hcHBlbmQoeCkKIApvdXRfID0gZ29vZF90cmlwbGV0cyhhcnIsIG4pCnByaW50IChvdXRfKQo=