tìm số có 3 chữ số sao cho abc=a^3+b^3+c^3

0 bình luận về “tìm số có 3 chữ số sao cho abc=a^3+b^3+c^3”

1. program oken;
   uses crt;
   var a,b,c: qword;
   begin
       clrscr;
       write(‘Cac so can tim: ‘);
       for a:=1 to 9 do
           for b:=0 to 9 do
               for c:=0 to 9 do
                   if (a*100+b*10+c=a*a*a+b*b*b+c*c*c) then
                       write(a,b,c,’ ‘);
       readln;
   end.

   Bình luận

2. uses crt;
   var a,b,c:longint;
   begin
   clrscr;
      for a:=1 to 9 do
         for b:=0 to 9 do
            for c:=0 to 9 do
               if(a*a*a+b*b*b+c*c*c=a*100+b*10+c)then writeln(a,b,c);
   readln
   end.

   ///////////////////////////////

   Test:

   

   Bình luận