pr = [2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47]
u = [74, 24, 14, 4, 2]
n = gets.to_i
pr = pr.map do |x|
  tm, res = n, 0
  while tm > 0
    tm /= x
    res += tm
  end
  res
end
u = u.map{|x| m.count{|y| y >= x}}
p u[0] + u[1]*(u[4]-1) + u[2]*(u[3]-1) + u[3]*(u[3]-1)/2*(u[4]-2)