#7.4.1
var("y")
plot3d(x^2+y^2, (x,-4,4), (y,-4,4))+plot(1)

#The surface around the point becomes flatter and flatter as you zoom in

#7.4.3
plot(4-(x^2/2), (x,-10,10))