n = gets.to_i
cnt = Array.new(50,0)
for i in 1..n
    for j in 2..49
        while i%j == 0
            i /= j
            cnt[j] += 1
        end
    end
end
a = Array.new(5,0)
cnt.each do |num|
    a[0] += 1 if num >= 2
    a[1] += 1 if num >= 4
    a[2] += 1 if num >= 14
    a[3] += 1 if num >= 24
    a[4] += 1 if num >= 74
end
ans = 0
ans += a[1]*(a[1]-1)/2*(a[0]-2)
ans += a[2]*(a[1]-1)
ans += a[3]*(a[0]-1)
ans += a[4]
puts ans