Mathematica的求值问题,已知几个方程,怎么求一个表达式的值

问题描述:

Mathematica的求值问题,已知几个方程,怎么求一个表达式的值
已知a1+a2=8,b1+b2=6,(a1+a2)^2+(b1+b2)^2=(a1-a2)^2+(b1-b2)^2
求a1^2+a2^2+b1^2+b2^2的值

z /.Solve[{a1 + a2 == 8,b1 + b2 == 6,(a1 + a2)^2 + (b1 + b2)^2 == (a1 - a2)^2 + (b1 - b2)^2,
z == a1^2 + a2^2 + b1^2 + b2^2},{a1,a2,b1,b2,z}]super smart再问一下那个z/.是什么意思啊,还有答案返给我一个{100,100},我怎么知道给的答案正是z的?那你就追加分吧。那还是算了,已经够无脑了。。。