pascal把数码1,2,3,4,...,9,分成3组,每组构成一个3位数,使这3个3位数恰好成为1:2:3.能不能写出每句话的意思

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/09 07:44:45

pascal把数码1,2,3,4,...,9,分成3组,每组构成一个3位数,使这3个3位数恰好成为1:2:3.能不能写出每句话的意思
pascal把数码1,2,3,4,...,9,分成3组,每组构成一个3位数,使这3个3位数恰好成为1:2:3.
能不能写出每句话的意思

pascal把数码1,2,3,4,...,9,分成3组,每组构成一个3位数,使这3个3位数恰好成为1:2:3.能不能写出每句话的意思
小丝望楼主采纳
var s,s1,s2,s3:string;
a1,a2,a3:integer;
k:integer;
ch:char;
begin
for a1:=102 to 329 do begin
a2:=a1*2; a3:=a1*3;
str(a1,s1); str(a2,s2); str(a3,s3);
s:=s1+s2+s3;
for ch:='0' to '9' do delete(s,pos(ch,s),1);
if s='' then begin
inc(k); writeln(' -----',s1,' ',s2,' ',s3);
end;
end;
end.

pascal把数码1,2,3,4,...,9,分成3组,每组构成一个3位数,使这3个3位数恰好成为1:2:3.能不能写出每句话的意思 求pascal的一道题,寻找160以内的素数,输出符合要求的素数要求:他的倒序数、数码和(如123的数码和是1+2+3)、数码积(如123的数码积是1*2*3)都是素数或1(如11是素数,他的倒序数也是素数, pascal解八数码难题 free pascal 习题把下列代数式写成Pascal表达式1/2(eu+e-u):-(a3+b3)y4:sin2(x+0.5)+3cos(2x+4):cos(x=y)/sin(|x|+|y|)的平方根 从1 到1000,这1000个数的数码之和是多少?是数码,不是求和.另外,再解释一下,什么是数码?你们这是在求和,错了!如:98的数码是9+8=17,30到32的数码是3+0=3,3+1=4,3+2=5,3+4+5=12,而不是30+31+32, 数码1,2,3,4,5,6,7,8,9中任选4个数码,用这四个数码组成数字最接近的两个两位数,并用d表示这两个两位数的差的绝对值(例如,选取数码1,2,7,9),则d=|27-19|=8),这样,任意四个数码就对应一个正整数 从数码1,2,3,4,5,6,7,8,9总任选四个数码,用这四个数码组成数值最接近的两个两位数,并用d 表示这两个两位数的差的绝对值(例如,选取数码1,2,7,9,则d=27-19的绝对值=8)这样,任意四个数码就对应一 从数码1,2,3,4,5,6,7,8,9中任选四个数码,用这四个数码组成数值最接近的两个两位数,并用d表示这两个两位数的差的绝对值(例如,选取数码1,2,7,9 则d=丨27-19丨=8),这样,任选四个数码就对应一个正 从1,2,3,4,5五个数码中,任取3个不同数码排成一个三位数,求:(1)所得的三位数为偶数的概率;( 有一串数字,任何相邻的4个数码之和都是20,从左往右起第102,1043,128个数码分别是1,3,9,求第一个数码. pascal编程 s=1*2+2*3+3*4+.n*(n+1) 球用PASCAL编写1-1/2+2/3-3/4+…-99/100=? pascal编程s=1+2/1+3/1+4/1+5/1.+100/1 pascal编程输出图形 7 6 5 8 1 4 9 2 3 10 11 由数码1,2,3,4可以组成多少个大于1234的四位数 已知自然数2*3*4*5*1能被11整除,问:*代表数码几? 自然数1 2 3 4 5 .1001中,所有数码之和是多少? 自然数:1,2,3,4,……,9998,9999 所有数码之和是( )