a = [2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97]

def yu(n,a)
    b = 0
    i = 1
    while n / (a ** i) > 0
        b += n / a ** i
        i += 1
    end
    b
end

N = gets.to_i
if a.select.with_index{|x,i| 4 <= yu(N,a[i])  && yu(N,a[i+1]) < 4}.size > 0
b = a.index(a.select.with_index{|x,i| 4 <= yu(N,a[i])  && yu(N,a[i+1]) < 4}[0])
h = a.index(a.select.with_index{|x,i| 2 <= yu(N,a[i])  && yu(N,a[i+1]) < 2}[0])
c = ((b * (b-1)) / 2) * (b+1) +  (((b+1) * b) / 2)  * (h-b)

else
    c = 0
end


if a.select.with_index{|x,i| 14 <= yu(N,a[i])  && yu(N,a[i+1]) < 14}.size > 0


d = a.index(a.select.with_index{|x,i| 14 <= yu(N,a[i])  && yu(N,a[i+1]) < 14}[0])
j = a.index(a.select.with_index{|x,i| 4 <= yu(N,a[i])  && yu(N,a[i+1]) < 4}[0])
e = d * (d+1) + (d+1) * (j-d)



else
    e = 0
end

if a.select.with_index{|x,i| 24 <= yu(N,a[i])  && yu(N,a[i+1]) < 24}.size > 0


f= a.index(a.select.with_index{|x,i| 24 <= yu(N,a[i])  && yu(N,a[i+1]) < 24}[0])
k = a.index(a.select.with_index{|x,i| 2 <= yu(N,a[i])  && yu(N,a[i+1]) < 2}[0])
g = f * (f+1) + (f+1) * (k-f)


else
    g = 0
end

if yu(N,2) >= 74
    puts (c+e+g+1)
else
    puts (c+e+g)
end