水仙花数是指一个3位数,其各位数字的立方和等于其本身。三位的水仙花数共有四个:153,370,371,407。我们可以用程序来找到它们,例如用Pascal语言实现如下:programshuixianhuashu;vara,b,c:integer;beginfora:=1to9doforb:=0to9doforc:=0to9doifa*a*a+b*b*b+c*c*c=100*a+10*b+cthenwriteln(100*a+10*b+c);end.或使用另一种方法:programsxh;vara,b,c,d:integer;beginfora:=100to999dobeginb:=amod10;c:=amod100div10;d:=adiv100;ifb*b*b+c*c*c+d*d*d=athenwriteln(a);end;end.也可以使用C语言实现如下:#includeintmain(void){inta,b,c;for(a=1;afor(b=0;bfor(c=0;cif(100*a+10*b+c==a*a*a+b*b*b+c*c*c)printf("%d%d%d\n",a,b,c);return0;}这些程序可以找出所有三位的水仙花数,程序逻辑简洁明了,适合初学者理解和学习。