> plot({x/(1+1*x^2),x/(1+10*x^2),x/(1+100*x^2),x/(1+1000*x^2)},x=-5..5,title=`Plots of f(n,x)=x/(1+n^x^2) on real line, for n=1,10,100.1000`);

> plot({x,x^2,x^5,x^10,x^100,x^1000},x=0..1,title=`Plots of f(n,x)=x^n for x in interval [0,1), for n=1,2,5,10,100,1000`);

> plot({Pi/2-(4/Pi)*cos(t),Pi/2-(4/Pi)*cos(t)-(4/Pi)*cos(3*t)/9,abs(t)},t=-Pi..Pi,title=`Truncated Fourier series approximations to |t|`);

> plot({2*sin(t),2*sin(t)-2*sin(2*t)/2,2*sin(t)-2*sin(2*t)/2+2*sin(3*t)/4,t},t=-Pi..Pi,title=`Truncated Fourier series approximations to t`);

>