n, m, x, y = gets.split.map(&:to_i) ans = (n / ((12 + y) * m)) * 12 n %= ((12 + y) * m) if n > 0 1.upto(12) do |i| ans += 1 if i >= x && i < x + y n -= 2 * m else n -= m end if n <= 0 break end end end p ans