小学奥数读本（四年级），P18第8(2)题

小学奥数读本（四年级），P18第8(2)题。

 1 var
 2   i,v,j,k,code:longint;
 3   s:string;
 4 begin
 5   for i:=1 to 9 do begin
 6     s:=stringofchar(chr(ord('0')+i),6); //转化为字符串，比如'111111'
 7     val(s,v,code); //由字符串，转化为数，比如111111
 8     for j:=1 to 9 do begin
 9       k:=v div j;
10       if( v mod j=0 ) then begin //如果能整除
11         str(k,s);
12         if( (length(s)=5) and (s[1]=s[4]) and (s[2]=s[5]) ) then
13           writeln(v,' / ',j,' = ',k); //输出
14       end;
15     end;
16   end;
17 end.

View Code

共得出六个答案，其中除数与商的第一位相同的，只有一个：111111 ÷ 3 = 37037。

转载于:https://www.cnblogs.com/xin-le/p/3766750.html