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|
  if e >= 74
    v += 1
  end

  if e >= 24
    w += 1
  elsif e >= 14
    x += 1
  elsif e >= 4
    y += 1
  elsif e == 2 || e == 3
    z += 1
  end
end

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