Plot[Sin[x/5]*Sqrt[x], {x, 0, 100}]

Options[Plot]

Plot[Sin[x/5]*Sqrt[x], {x, 0, 100}, Axes -> False]

ParametricPlot[{t,Sin[t/5]*Sqrt[t]}, {t, 0, 100}]

ParametricPlot[{t,Sin[t/5]*Sqrt[t]}, {t, 0, 100}, PlotRange -> {{0, 100}, {-20, 20}}]

ParametricPlot[{Cos[t], Sin[t]}, {t, 0, 2Pi}]

ParametricPlot[{Cos[2t], Sin[3t]}, {t, 0, 2Pi}]

Manipulate[ParametricPlot[{Cos[11t], Sin[6t]}, {t, 0, k}, PlotRange -> {{-4, 4}, {-4, 4}}], {k, 0.001, 4Pi}]

Manipulate[ParametricPlot[{Cos[11t], Sin[6t]}, {t, 0, k}], {k, 0.001, 4Pi}]

Manipulate[ParametricPlot[{Cos[a*t], Sin[b*t]}, {t, 0, k}, PlotRange -> {{-4, 4}, {-4, 4}}], {k, 0.001, 4Pi}, {a, -2, 4}, {b, -2, 4}]

ellisse[x0_, y0_][a_,b_][t_] := {x0+a*Cos[t], y0 + b*Sin[t]}

ParametricPlot[ellisse[1,2][2,5][t], {t, 0, 2Pi}]

Manipulate[ParametricPlot[ellisse[1,2][h,k][t], {t, 0, 2Pi}, PlotRange -> {{-10, 10}, {-10, 10}}],{h, 0.3, 3}, {k, 1, 4}]

ParametricPlot3D[{Cos[2t], Sin[3t], Cos[t]}, {t, 0, 2Pi}]

Graphics[Line[{{1,1}, {-2, 4}}]]

Graphics[Line[{{1,1}, {-2, 4}, {3,4}, {-5,6}}]]

p= Tuples[Table[{Cos[t], Sin[t]}, {t,0, 2Pi, 2Pi/11}], 2]

Graphics[Line[Tuples[Table[{Cos[t], Sin[t]}, {t,0, 2Pi, 2Pi/11}], 2]]]

Graphics[Circle[{2,3}, 5]]

ipocicloide[a_, b_][t_] := {(a-b)Cos[t]+b*Cos[(a-b)/b*t],(a-b)*Sin[t] - b*Sin[(a-b)/b*t]}

ParametricPlot[ipocicloide[11,6][t], {t, 0, 10Pi}, PlotRange -> {{-20, 20}, {-20, 20}}]

Manipulate[ParametricPlot[ipocicloide[3,1][t], {t, 0, k}, PlotRange -> {{-3, 3}, {-3, 3}}, Epilog -> {Circle[{0,0},3], Circle[{2Cos[k], 2Sin[k]}, 1], Line[{{2Cos[k], 2Sin[k]}, ipocicloide[3,1][k]}]}], {k, 0.0001, 4Pi}]

Manipulate[ParametricPlot[{ t-Sin[t],1-Cos[t]},{t,0,k},PlotRange->{{0,15},{-2,5}}],{k,0.1,6 Pi}]