SmoothHistogram[
 Table[Table[
   Sum[RandomReal[] - 0.5, {i, 1,
     numberOfRandomNumbersAdded}], {1000000}],
{numberOfRandomNumbersAdded, 1, 5}]]

UnitBox[x]

Integrate[UnitBox[a], {a, x - 1/2, x + 1/2}]