r, g, b, n = gets.split.map(&:to_i)
ans = 0
0.step(n, r) do |i|
  0.step(n, g) do |j|
    next if n < i + j
    0.step(n, b) do |k|
      next if n < i + j + k
      ans += 1 if i + j + k === n
    end
  end
end
puts ans
