用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