用Pascal编程求满足下列条件的三位数：该三位数等于它数字的立方和.
1个回答
program dd;var a,b,c:integer;beginfor 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.
相关问题
最新问答： 《为学》开头运用设问的修辞手法有什么作用 下列对生产、生活现象的解释正确的是（ ） 大义凛然和豪情壮志的意思以及每个字的意思 关于物体的题目 炮弹里火药燃烧产生的高温气体炸开弹壳后温度降低,是用 做功 的方法减少了气体的内能 垂直温差是什么? 英语第一到第二十怎么写 “长”、“年轻”、“强壮的”还有“古老的”的英语单词的比较级怎么写？ 新华书店运来一批儿童读物,第一天卖了30% 第二天卖的相当于第一天卖的120% 比第 小升初语文题下面一段话中有些地方有语病,请找出并加以修改.(8分)“国庆”前夕,我校举办了一次“我为祖国添光彩”演讲比赛 密度公式转换怎么能够很快地记住 请问繁体字 的四个“龙” 读什么 能用什么输入法打出来？ 用惰性电极电解亚硫酸钠溶液的电极方程式如何写 1/x的导数是? 早饭你想吃什么用英语这么说啊---- ------ you ----- ----- baskfast 在1/3,300%,3.4%,0.3%,33%这5个数中,最大的数是（ ）,最小的数是（ ） CR MANAGER中的CR怎么理解? get for是否等于get to 滑轮组是不是 动滑轮上的 绳子股数越多就越省力? 一条马路一侧每隔20米安装一盏路灯,一共安装了46盏路灯.从第一盏路灯到最后一盏的距离有多远? c(2,2)+c(3,2)+c(4,2)+……+c(n,2)有没有公式可以算?
