Integrate[UnitStep[Sin[x]], {x, 0, 30}]