Mathematica/Basic3DPlotting

To produce simple 3D surface plots, use the Plot3D command.

Plot3D[Sin[x+Sin[y]],{x,0,4},{y,0,4}]