杭州交通信息网生存战争捕鱼器:pascal高手请进！！
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/03 05:59:10
帮忙做几道题啦^^
1.键入a,b二个变量的值，打印输出a+b的横式和竖式。
2.键入一个四位整数，输出倒序。
3.求100到999中水仙花数。例三位数abc，若a^3(a的3次幂）+b^3+c^3=abc则abc为水仙花数。
请把程序写出！！
必有重谢！！
不是高手也行，可你得做出来啊！！
1.键入a,b二个变量的值，打印输出a+b的横式和竖式。
2.键入一个四位整数，输出倒序。
3.求100到999中水仙花数。例三位数abc，若a^3(a的3次幂）+b^3+c^3=abc则abc为水仙花数。
请把程序写出！！
必有重谢！！
不是高手也行，可你得做出来啊！！
第2, 第3题都比较简单, 但第1题a, b是整型还是实型? 如果是整型也容易, 如果是实型, 恐怕标准pascal无能为力, 必须用扩展的库, 比如Turbo pascal, Free pascal或Delphi之类.
第2题:
Readln(n);
while n > 0 do
begin
Writeln(n mod 10);
n := n div 10;
end;
第3题:
for m := 1 to 9 do
for n := 0 to 9 do
for i := 0 to 9 do
if m*m*m + n*n*n + i*i*i = 100*m + 10*n + i then Writeln(100*m + 10*n + i);
不是吧都来 baidu 做作业。。。
很简单，不用高手就可以
恩