作业帮pascal初学者求助啊![j10]水仙花数Time Limit:1000MS Memory Limit:65536KTotal Submit:57 Accepted:39 Description 求三位水仙花数.Input 无Output 输出三位水仙花数.一行一个.水仙花数是指一个 n 位数 ( n≥3 ),它的每
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/15 15:09:14
pascal初学者求助啊![j10]水仙花数Time Limit:1000MS Memory Limit:65536KTotal Submit:57 Accepted:39 Description 求三位水仙花数.Input 无Output 输出三位水仙花数.一行一个.水仙花数是指一个 n 位数 ( n≥3 ),它的每
pascal初学者求助啊!
[j10]水仙花数
Time Limit:1000MS Memory Limit:65536K
Total Submit:57 Accepted:39
Description
求三位水仙花数.
Input
无
Output
输出三位水仙花数.一行一个.
水仙花数是指一个 n 位数 ( n≥3 ),它的每个位上的数字的 n 次幂之和等于它本身.（例如：1^3 + 5^3 + 3^3 = 153）
1^3即1*1*1
pascal初学者求助啊![j10]水仙花数Time Limit:1000MS Memory Limit:65536KTotal Submit:57 Accepted:39 Description 求三位水仙花数.Input 无Output 输出三位水仙花数.一行一个.水仙花数是指一个 n 位数 ( n≥3 ),它的每
program j10;
const n=3;
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=a*100+b*10+c then writeln(a,b,c);
end.
主要方法是枚举.a,b,c代表一个三位数百位,十位,个位的数字,判断这三个数字的三次方和与形成的三位数是否相等,相等就是水仙花数