日用黑釉瓷器:把数字1，2，3，4，…，9分成3组，每组构成一个3位数，使这3个3位数恰好成1：2：3，该怎样分？

来源：百度文库编辑：杭州交通信息网时间：2024/05/11 02:20:24

把数字1，2，3，4，…，9分成3组，每组构成一个3位数，使这3个3位数恰好成1：2：3，该怎样分？求出所有的解答来。（如：192，384，576就是一组解答）。补充一点，这题目要用最基础的解，我才学了分支结构，循环才学了FOR，题目的要求好象是要用FOR来解，下面是我编的，但是结果出不来，高手们看看吧，谢谢指教。
program ex;
var flag,i,j,first,second,third:integer;
a:array[0..8] of integer;
begin
for first:=123 to 329 do
begin
flag:=1;
second:=first*2;
third:=first*3;
a[0]:=first div 100;
a[1]:=first mod 100 div 10;
a[2]:=first mod 100;
a[3]:=second div 100;
a[4]:=second mod 100 div 10;
a[5]:=second mod 100;
a[6]:=third div 100;
a[7]:=third mod 100 div 10;
a[8]:=third mod 100;
for i:=0 to 7 do
for j:=1 to 8 do
if a[i]=a[j] then
flag:=0;
if flag=1 then
writeln(first,' ',second,' ',third)
end
end.
我的程序到底错在哪里。

s=0;
int interger[3];
times=0
while(times<9)
{
for(i=1;i<=9;i++)
for(j=1;j<=9;j++)
for(k=1;k<=9;k++)
{
if(i!=j&&i!=k&&j!=k) integer[s++]=100*i+10*j+k;
}
if(integer[0]*2==integer[1]&&integer[0]*3==integer[2]&&integer[1]*3==integer[2]*2)
{ for(m=0;m<3;m++) printf("%d ",integer[m]);}
times++;
}

说

把数字1，2，3，4，…，9分成3组，每组构成一个3位数，使这3个3位数恰好成1：2：3，该怎样分？把1,2,3,4,5,6,7,8这8个数平均分成2组,每组4个数的和相等,这样的分法有( )种? 把一个表分成3份使每1份的4个数相加的和相等!` 1 2 3 6 8 9这六个数字可以分成哪些四位数? 请问将1 3 5 7 9五位数字分成7位数字加在一起，最后结果将为30！把2633、34、35、63、85、91、143分成若干组，使每一组中任两个数的最大公约数是1至少要分成几组？将1，2，…，9这9个数平均分成三组，则每组的三个数都成等差数列的概率为多少？将1,2,…,9这九个数平均分成三组，则每组的三个数都成等差数列的概率为？把4米长的钢丝平均分成8段,每段是4米的?/?;是1米的?/?其中的3段一共长?米把1-9这9个数字填在图中,使每条边上4个数字的和相等!