Integrate[(Sin[a*x])^2/(x^2),{x,0,t}]

Plot[x*(1-0.2*Sqrt[x]),{x,0,100}]

Integrate[t^(s-1)*Sinc[e*t],{t,0,Infinity}]

Integrate[t^(s-1)*Exp[I*e*t],{t,0,Infinity}]

Sum[k^2,{k,1,A}]

Plot[y - (1/6)*y^(3/2)*(1+Sqrt[y])*(1+2*Sqrt[y])*0.05,{y,0,10}]

a = Log[2]/Log[3];

LogLogPlot[{t^(2*a/3),t^(2*a)*(Log[t])^(-2)},{t,1,100}]