March 07, 2006 8:45 am
Larson ch 1.3, p. 64 - 66
19.

y = Sin[x]

Limit[y, x -> π/2]

Plot[y, {x, -2 π, 2  π}, 
        PlotStyle -> Red];

Clear[y]

y = Tan[x]

Limit[y, x -> π]

Plot[y, {x, -2 π,  2  π},  
      PlotStyle -> Blue]

Clear[y]

y = Cos[((π) x)]

Limit[y, x -> 1]

Plot[y, {x, -2 π, 2  π}, 
        PlotStyle  -> Red];

22.

Clear[y]

y = Sin[(π) x/2]

Limit[y, x -> 1]

Plot[y, {x, -2 π, 2  π},  
        PlotStyle -> Blue];