student僷僢働乕僕偺extrema僐儅儞僪傪梡偄傞偲丄忦審晅偒嬌抣傪媮傔傞偙偲偑偱偒傑偡丅
椺偊偽丄忦審g(x,y)=x2+(y2/4)=1偺壓偱偺娭悢f(x,y)=xy偺嬌抣傪媮傔傞偵偼師偺傛偆偵擖椡偟傑偡丅
>with(student):
>extrema(x*y,x2+y2/4=1,{x,y},'s') (忦審晅偒嬌抣傪寁嶼)
>s (嬌抣揰偺岓曗傪昞帵)
|
>plot3d(piecewise(x2+y2/4>0.9 and x2+y2/4<1.1 , x*y,none), x=-2..2,y=-2..2,grid=[100,100]) |
[惓夝椺]