viết chương trình in ra màn hình các số có 3 chữ số thỏa mãn điều kện số đó bằng tổng lập phương các chữ số của nó(100a+10b+c=a^3+b^3+c^2)

0 bình luận về “viết chương trình in ra màn hình các số có 3 chữ số thỏa mãn điều kện số đó bằng tổng lập phương các chữ số của nó(100a+10b+c=a^3+b^3+c^2)”

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

   Bình luận