factorial[n_Integer] := Block[{i}, Times @@ Table[i, {i, n}]]