作业帮 > 数学 > 作业

turbo pascal的一道题:找出100到999之间的整数中所有等于它每位数字立方和的数

来源:学生作业帮 编辑:搜搜考试网作业帮 分类:数学作业 时间:2024/06/05 19:55:40
turbo pascal的一道题:找出100到999之间的整数中所有等于它每位数字立方和的数
turbo pascal的一道题:找出100到999之间的整数中所有等于它每位数字立方和的数
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}