n = gets.to_i
prime = [2,3,5,7,11,13,17,19,23,29,31,37,41,43,47]
exp = [0]*15
2.upto(n) do |v|
  prime.each_with_index do |a,i|
    while (v % a == 0)
      exp[i] += 1
      v /= a
    end
  end
end

v,w,x,y,z = 0,0,0,0,0
exp.each do |e|
  v += 1 if e >= 74
  w += 1 if e >= 24
  x += 1 if e >= 14
  y += 1 if e >= 4
  z += 1 if e >= 2
end

ans = 0
ans += v
ans += w * (z-1)
ans += x * (y-1)

if y >= 3
  ans += y * (y-1) * (y-2) /2
end
if y >= 2 && z > 0
  ans += y * (y-1) * (z-y) /2
end
p ans