作业帮 > 综合 > 作业

用Pascal编程求满足下列条件的三位数:该三位数等于它数...

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/01 23:10:01
用Pascal编程求满足下列条件的三位数:该三位数等于它数...
ogram dd;
var a,b,c:integer;
begin
for a:=1 to 9 do
for b:=0 to 10 do
for c:=0 to 10 do
if a*a*a b*b*b c*c*c=a*100 b*10 c then writeln(a*100 b*10 c);
end.