Інструкція 5 кроків, що виконуються по порядку в одній сесії. Кожен крок було виконано на рушії, і вивід нижче — те, що він дав.
Plot3D[Sin[x] Sin[y] ^ 2, {x, 0, Pi}, {y, 0, Pi}]-Graphics3D-Plot3D[{Sin[x] Sin[y] ^ 2, 2 - Sin[x] Sin[y] ^ 2}, {x, 0, Pi}, {y, 0, Pi}]-Graphics3D-ParametricPlot3D[{r Cos[t], r Sin[t], Log[r ^ (1 / 2)]}, {r, 0.1, 1}, {t, 0, 2Pi}]-Graphics3D-SphericalPlot3D[1, {t, 0, Pi}, {p, 0, 2Pi}]-Graphics3D-ContourPlot3D[x ^ 2 + y ^ 2 - z ^ 2 == 0, {x, -2, 2}, {y, -2, 2}, {z, -2, 2}]-Graphics3D-