ith open('ff.txt', 'r') as f:
    data = [int(i) for i in f.read().strip().split('\n')][1:]

data = [i for i in range(1, 10000)]
k = 30
i30, i15, i10, i6, i5, i3, i2 = -1, -1, -1, -1, -1, -1, -1
res = 0
for i in range(len(data)):
    x = data[i]
    if x % 30 == 0:
        i30 = i
    elif x % 15 == 0:
        i15 = i
    elif x % 10 == 0:
        i10 = i
    elif x % 6 == 0:
        i6 = i
    elif x % 5 == 0:
        i5 = i
    elif x % 3 == 0:
        i3 = i
    elif x % 2 == 0:
        i2 = i

    idxs = [q for q in [i2, i3, i5, i6, i10, i15, i30] if q >= 0]
    if x % 30 == 0:
        res += 0
    elif x % 15 == 0:
        idxs = [q for q in idxs if q % 2 == 0]
        if not idxs:
            idxs = [0]
        res += i - min(idxs)
    elif x % 10 == 0:
        idxs = [q for q in idxs if q % 3 == 0]
        if not idxs:
            idxs = [0]
        res += i - min(idxs)
    elif x % 6 == 0:
        idxs = [q for q in idxs if q % 5 == 0]
        if not idxs:
            idxs = [0]
        res += i - min(idxs)
    elif x % 5 == 0:
        idxs = [q for q in idxs if q % 6 == 0]
        if not idxs:
            idxs = [0]
        res += i - min(idxs)
    elif x % 3 == 0:
        idxs = [q for q in idxs if q % 10 == 0]
        if not idxs:
            idxs = [0]
        res += i - min(idxs)
    elif x % 2 == 0:
        idxs = [q for q in idxs if q % 15 == 0]
        if not idxs:
            idxs = [0]
        res += i - min(idxs)
    else:
        res += i - (i30 if i30 >= 0 else 0)

print(res)