DiscretePlot[Sin[n \[Pi]], {n, 1, 20}]