WolframAlpha computational knowledge AI
Plot[Piecewise[{{x / 1000, 0 < x < 10^6}, {0.8 * x / 1000 + 200, 10^6 < x < 10^7}, {0.6 * x / 1000 + 2200, 10^7 < x < 10^8}, {0.4 * x / 1000 + 22200, 10^8 < x < 3*10^8}}], {x, 0, 120*10^6}]