#n, m = gets.chomp.split.map(&:to_i)
#ary = []; n.times { cakes << gets.chomp.split.map(&:to_i).to_a } 
#def cb(i);	i==1 ? 1 : -1;end
n = gets.chomp.to_i
primes = [2,3,5,7,11,13,17,19,23,29,31,37,41,43,47]
a = {}
a[2]=0
a[3]=0
a[5]=0
a[7]=0
a[11]=0
a[13]=0
a[17]=0
a[19]=0
a[23]=0
a[29]=0
a[31]=0
a[37]=0
a[41]=0
a[43]=0
a[47]=0
ans = 0

2.step(n, 1) { |i|
  memo = i
  primes.each do |prime|
  	while (memo % prime == 0) do
  	  memo = memo/prime
  	  a[prime] += 1
  	end
  	break if memo == 1
  end
}

over74 = a.select {|aa, v| v >73 }
over24 = a.select {|aa, v| v >23 }
over14 = a.select {|aa, v| v >13 }
over4 = a.select {|aa, v| v > 3 }
twos  = a.select {|aa, v| v == 2 || v== 3}
ofs = over4.size

ans += ofs*(ofs-1)*(ofs-2)/2
ans += ofs*(ofs-1)/2 * twos.size # 5 5 3 , 3が^2の時、と3が^5のときで分ける
ans += over14.size * ofs - over14.size
ans += over24.size * (twos.size + ofs) - over24.size
ans += over74.size

puts ans
