这个图是B站的up主的

我按照他的弄了一份，明明一模一样，为什么运行不了啊

ff[profit_, var_] := (firstor = D[profit, var] // FullSimplify;
print["first order derivative is ", firstor];
equl = Solve[firstor == 0, var] // FullSimplify;
print["optimal solution is", equl];
secondor = D[profit, {var, 2}] // FullSimplify;
print["second order derivative is ", seconder]);
ff[x^2 + 2 x - 8, x]
这个是我自己的代码，就是想求一阶偏导和最优解还有二阶偏导，我用的是13.0版本的，为什么不一样呀，有没有大佬帮帮我