首页 > 代码库 > 小学奥数读本(三年级),P133第12题
小学奥数读本(三年级),P133第12题
小学奥数读本(三年级),P133第12题。
用一到八,八个数,组成一道除法算式:口口口口÷口=口口口
这题有两个答案:
453*6=2718
582*3=1746
用pascal编程解决,解法一:
1 var 2 i,j:longint; 3 s:set of char; 4 st:string; 5 begin 6 for i:=123 to 987 do 7 for j:=1 to 8 do begin 8 s:=[]; 9 str(i,st); 10 s += [st[1]]+[st[2]]+[st[3]]; 11 str(j,st); 12 s += [st[1]]; 13 if(i*j>=1234) then begin 14 str(i*j,st); 15 s += [st[1]]+[st[2]]+[st[3]]+[st[4]]; 16 end; 17 if( s = [‘1‘..‘8‘] ) then writeln(i,‘ ‘,j,‘ ‘,i*j); 18 end; 19 end.
解法二:
1 var 2 i,j,k:longint; 3 s:set of 0..8; 4 begin 5 for i:=123 to 987 do 6 for j:=1 to 8 do begin 7 s:=[]; 8 s += [j]; 9 k:=i; 10 while(k>0) do begin 11 s += [k mod 10]; 12 k := k div 10; 13 end; 14 k:=i*j; 15 while(k>0) do begin 16 s += [k mod 10]; 17 k := k div 10; 18 end; 19 if( s = [1..8] ) then writeln(i,‘ ‘,j,‘ ‘,i*j); 20 end; 21 end.
声明:以上内容来自用户投稿及互联网公开渠道收集整理发布,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任,若内容有误或涉及侵权可进行投诉: 投诉/举报 工作人员会在5个工作日内联系你,一经查实,本站将立刻删除涉嫌侵权内容。