require 'prime'

n = gets.strip.to_i

dim=Array.new(n+1, 0)
(1..n).each do |c|
  c.prime_division.each do |b, d|
    dim[b]+=d
  end
end

result=0
target_pairs = [[5,5,3], [15, 5], [25,3], [75]]

targets = dim.select {|e| e>0 }
targets.length.times do |i|
end

targets.combination(3).each do |a, b, c|
  result+=1 if (a>=4 && b>= 4 && c >= 2)
  result+=1 if (a>=4 && b>= 2 && c >= 4)
  result+=1 if (a>=2 && b>= 4 && c >= 4)
end

targets.combination(2).each do |a, b|
  [ [14, 4], [24, 2] ].each do |t1, t2|
    result+=1 if (a>=t1 && b>= t2)
    result+=1 if (a>=t2 && b>=t1)
  end
end

result+=targets.select {|e| e>=74 }.length

p result
#p targets
