用VB6.0解一条三元一次方程

来源：百度知道 编辑：UC知道 时间：2024/09/21 18:10:52
用VB6.0解一条三元一次方程
x+y+z=19
0.1x+0.2y+0.25z=3
3x+5y+6z=69
我不精通VB，所以我要详细的程序——就是可以直接得出解的那种。
谢谢合作！

这个简单。看好拉
dim x as interger
dim y as interger
dim z as interger
for x=1 to 19
for y=1 to 19
for z=1 to 19
if x+y+z=19 and 0.1x+0.2y+0.25z=3 and 3x+5y+6z=69 then//应该放上面
print x,y,z

next z
next y
next x

懂数学吧??
用增广矩阵做!!!!

我虽然不会做这个题目,但是ZaZeZo的回答应该是不正确的.因为XYZ中间可以有负值的.你定义XYZ都是1--19,所以会丢失方程组的解吧!