vb题：编写求解不定方程15x+9y+z=30的正整数解.怎么用for循环来确认x、y、z的取值范围,是不是确定它们都是从1to100（任意取的）就行?

Question

vb题：编写求解不定方程15x+9y+z=30的正整数解.
怎么用for循环来确认x、y、z的取值范围,是不是确定它们都是从1 to 100（任意取的）就行?

Answer 1

将你上面的方程写做Ax+By+Cz=D
其中A=15,B=9,C=1,D＝30
因为x,y,z为正数,所以x,y,z都>=1
当x,y,z中两个等于1时,第三数就是循环的最大范围.
所以循环可写做：
For x=1 to (D-B-C)/A
For y=1 to (D-A-C)/B
For z=1 to (D-A-B)/C