Plot[-x+100 + x(x-100)/120, {x,0,100}]