pascal:一个6位数的2,3,4,5,6倍仍然是6位数,而且它们都由原数的6个数字组成,这个数是多少?

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/17 06:36:29

pascal:一个6位数的2,3,4,5,6倍仍然是6位数,而且它们都由原数的6个数字组成,这个数是多少?
祝开心~
我要的是怎么用pascal编!
开心~

var
i,j:longint;
m,n:integer;
a,b:array[1..6] of integer;
function Estimation1(i:longint):boolean;
var
r:integer;
begin
Estimation1:=false;
for r:=2 to 6 do
if ((i*r) div 1000009)then exit;
Estimation1=true;
end;
function Estimation2(i:longint):boolean;
var
k,l,c,t,p:integer;
begin
k:=7;
repeat
k:=k-1;
a[k]:=i mod 10;
i:=i div 10;
until i dvi 10

pascal:一个6位数的2,3,4,5,6倍仍然是6位数,而且它们都由原数的6个数字组成,这个数是多少? 下面有6张数字卡片用它们组成的六位数的5倍仍然是一个六位数而且也是由这6个数字组成有4、7、8、1、2、5六个数字,用它们组成的六位数的3倍仍然是一个六位数,也由这6个数字组成.能找出几组? 下面有六张数字卡片,用它们组成的六位数的5倍仍然是一个六位数,而且也是由这6个数字组成.你能找出几个? 有一个6位数,它的两2倍,3倍,4倍,5倍,6倍都由原数的6个数组成,只是顺序不同.求这个六位数有六张卡片分别写着 4 7 8 1 2 5 用他们组成的六位数的5倍仍然是一个六位数,而且也是由这6个数字组成. 将由1,2,3,4,5,6,7,8组成且个数字互不相同的8位数,这个数的左数第2008位数是? 有六张卡片分别写着 4 7 8 1 2 5 用他们组成的六位数的5倍仍然是一个六位数.而且也是这6个数字组成. 一个六位数,分别用2、3、4、5、6乘它,得到的五个新数仍是由原数中的六个数字组成,只是位置不同,此六位数是多少?” 一个六位数分别乘1 2 3 4 5 6,得到仍由原六个数组成的数,求那个六位数. 一个6位数,个位数字是2,如果把2移到最高位,那么原数就是新数的3倍,求原来的六位数 1,有一个六位数,当分别用2,3,4,5,6乘它后,得到的数还是个六位数,而且是原来的六个数字组成,F