作业帮这方程组mathematica能解吗?
来源：学生作业帮 编辑：作业帮 分类：数学作业 时间：2024/05/21 16:59:02
这方程组mathematica能解吗?
设：a*A*x=b*B*y=c*C*z
d*D*x=e*E*y=f*F*z
x+y+z=1
A+B+C=1
D+E+F=1
已知 a b c d e f
x y z A B C D E F的正数解 能用mathematica表达出来吗?
（设a=2.6 b=3.1 c=2.6 d=2.75 e=3 f=2.75 求mathematica表达式）
应该是 (1-a*A)*x=(1-b*B)*y=(1-c*C)*z
(1-d*D)*x=(1-e*E)*y=(1-f*F)*z
x+y+z=1
A+B+C=1
D+E+F=1
设：a*A*x=b*B*y=c*C*z
d*D*x=e*E*y=f*F*z
x+y+z=1
A+B+C=1
D+E+F=1
已知 a b c d e f
x y z A B C D E F的正数解 能用mathematica表达出来吗?
（设a=2.6 b=3.1 c=2.6 d=2.75 e=3 f=2.75 求mathematica表达式）
应该是 (1-a*A)*x=(1-b*B)*y=(1-c*C)*z
(1-d*D)*x=(1-e*E)*y=(1-f*F)*z
x+y+z=1
A+B+C=1
D+E+F=1
七个方程解九个未知数,应该是不能解的,这个都不用mathematica就能判断.实在想试试的话,可以写代码如下：（mathematica中C、D、E都是保留字,我把大写字母统统替换成AA~FF）
Solve[Join[{(1 - a*A)*x == (1 - b*B)*y == (1 - c*C)*z,(1 - d*D)*
x == (1 - e*E)*y == (1 - f*F)*z,x + y + z == 1,
A + B + C == 1,
D + E + F == 1},# > 0 & /@ {x,y,z,AA,BB,CC,DD,EE,
FF}] /.Thread[{a,b,c,d,e,f} -> {2.6 ,3.1 ,2.6 ,2.75,
3 ,2.75}] /.
Thread[{A,B,C,D,E,F} -> {AA,BB,CC,DD,EE,FF}],
{x,y,z,AA,BB,CC,DD,EE,FF}]
一堆错误提示后,也能“求解”出一列等式,不过每个字母都用其他字母来表示,显然是缺条件所致.
Solve[Join[{(1 - a*A)*x == (1 - b*B)*y == (1 - c*C)*z,(1 - d*D)*
x == (1 - e*E)*y == (1 - f*F)*z,x + y + z == 1,
A + B + C == 1,
D + E + F == 1},# > 0 & /@ {x,y,z,AA,BB,CC,DD,EE,
FF}] /.Thread[{a,b,c,d,e,f} -> {2.6 ,3.1 ,2.6 ,2.75,
3 ,2.75}] /.
Thread[{A,B,C,D,E,F} -> {AA,BB,CC,DD,EE,FF}],
{x,y,z,AA,BB,CC,DD,EE,FF}]
一堆错误提示后,也能“求解”出一列等式,不过每个字母都用其他字母来表示,显然是缺条件所致.