Input := wave1 = Cos[150 2 Pi t]
Output = Cos[300 Pi t]
Input := Plot[wave1, {t, 0, 0.1}, PlotPoints -> 50]
Output = -Graphics-
Input := Play[wave1, {t, 0, 1}]
Output = -Sound-