用delphi编写的水仙花数代码。。具体题目在文档中