g[u_,r_,q_]=r*(1-u/q)
h[u_]= u/(1+u^2)
Manipulate[Plot[{g[u,r,q],h[u]},{u,0,10}, PlotRange->{{0,10},{0,0.6}}],{q,1,10},{r,0.2,1}]