require 'prime'

def kouyakusu(a, b)
  Prime.int_from_prime_division((a.prime_division + b.prime_division).uniq)
end

n = gets.to_i 
a,b,c = gets.split(" ").map(&:to_i)
ab = kouyakusu(a, b)
ac = kouyakusu(a, c)
bc = kouyakusu(b, c)
abc = kouyakusu(ab, bc)
puts ((n/a) + (n/b) + (n/c) - (n/ab) - (n/ac) - (n/bc) + (n/abc))