mathematica中同时判断多个函数——可变动参数的情况

利用Manipulate和Animate函数

代码示例：

Clear["`*"];
Manipulate[{Reduce[
   Maximize[{a*x^2 - b, 0 <= x <= 1}, {x}][[2, 1, 2]] > 0], 
  Reduce[Maximize[{a*x^2 - b, 0 <= x <= 1}, {x}][[2, 1, 2]] == 0], 
  Reduce[Maximize[{a*x^2 - b, 0 <= x <= 1}, {x}][[2, 1, 2]] < 
    0]}, {a, -1, 1}, {b, -1, 1}]
Animate[{Reduce[
   Maximize[{a*x^2 - b, 0 <= x <= 1}, {x}][[2, 1, 2]] > 0], 
  Reduce[Maximize[{a*x^2 - b, 0 <= x <= 1}, {x}][[2, 1, 2]] == 0], 
  Reduce[Maximize[{a*x^2 - b, 0 <= x <= 1}, {x}][[2, 1, 2]] < 
    0]}, {a, -1, 1}, {b, -1, 1}]

输出结果：