循环第一个数n,从123到329(因为最大到329,再大3*n就不是三位数了),然后算出2*n 3*n,看看这三个数是不是正好把1~9用了。程序:var i,a,b,j,ans:longint; ok:boolean; f:array[0..9]of boolean;begin for i:=123 to 329 dobegin
a:=2*i; b:=3*i;
fillchar(f,sizeof(f),false);//数组清零
f[i div 100]:=true; f[(i mod 100)div 10]:=true; f[i mod 10]:=true; f[a div...
|