Contoh 4 langkah, dijalankan berurutan dalam satu sesi. Setiap langkah dieksekusi pada mesin dan keluaran di bawah adalah apa yang dihasilkannya.
eqn = x ^ 2 + 2a x + 1 == 0;Tanpa keluaran - langkah ini menyiapkan sesuatu untuk langkah berikutnya.
sol = Solve[eqn, x]{{x -> (-2*a - 2*Sqrt[-1 + a^2])/2}, {x -> (-2*a + 2*Sqrt[-1 + a^2])/2}}forPlot = x /. sol{(-2*a - 2*Sqrt[-1 + a^2])/2, (-2*a + 2*Sqrt[-1 + a^2])/2}Plot[forPlot, {a, -5, 5}]-Graphics-