> 数学 >
turbo pascal的一道题:找出100到999之间的整数中所有等于它每位数字立方和的数
人气:371 ℃ 时间:2019-08-19 14:56:50
解答
var a,b,c:integer;
begin
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=100*a+10*b+c then writeln(a,b,c);
end.
{结果:
153
370
371
407}
推荐
猜你喜欢
© 2024 79432.Com All Rights Reserved.
电脑版|手机版