# frozen_string_literal: true

def solve
  (0..Rational(N, 7).floor).map do |g|
    (0..Rational(N - 7 * g, 5).floor).count do |t|
      ((N - 7 * g - 5 * t) % 3).zero?
    end
  end.sum
end

N = gets.to_i

puts solve