| 记录编号 | 82543 | 评测结果 | AAAAA | ||
|---|---|---|---|---|---|
| 题目名称 | 368.水仙花数 | 最终得分 | 100 | ||
| 用户昵称 | 是否通过 | 通过 | |||
| 代码语言 | Pascal | 运行时间 | 0.002 s | ||
| 提交时间 | 2013-11-25 18:13:33 | 内存使用 | 0.17 MiB | ||
var
a,s,d,f,g:longint;
begin
assign(input,'daff.in');
assign(output,'daff.out');
reset(input);
rewrite(output);
read(a);
s:=a mod 10;
d:=a div 10 mod 10;
f:=a div 100;
s:=s*s*s;
d:=d*d*d;
f:=f*f*f;
g:=s+d+f;
if a=g then
write('TRUE') else write('FALSE');
close(input);
close(output);
end.