package main

import . "fmt"
import . "math/big"

func main() {
	var n int 
	Scan(&n)
	a := make([]int64, n)
	for i:= range a {
		Scan(&a[i])
	}
	var cnt int
	x, y, z, t := new(Int), new(Int), new(Int), new(Int)
	for i, u := range a {
		x.SetInt64(u)
		for j, v := range a[i+1:] {
			y.SetInt64(v)
			for _, w := range a[i+j+2:] {
				z.SetInt64(w)
				if t.GCD(nil, nil, x, y).GCD(nil, nil, t, z).Int64() == 1 {
					cnt++
				}
			}
		}
	}
	Println(cnt)
}