【资料图】
今天来聊聊叶玫瑰数有哪几个,四叶玫瑰数vb的文章,现在就为大家来简单介绍下四叶玫瑰数有哪几个,四叶玫瑰数vb,希望对各位有所帮助。
1、四位数各位上的数字的四次方之和等于本身为四叶玫瑰数。
2、实现源码如下: program roseNumber; var a,b,c,d:longint; function four(n:longint):longint; begin four:=n*n*n*n; end; begin for a:=1 to 9 do for b:=0 to 9 do for c:=0 to 9 do for d:=0 to 9 do begin if(1000*a+100*b+10*c+d=four(a)+four(b)+four(c)+four(d))then begin writeln(a,b,c,d); end end end.。
相信通过四叶玫瑰数vb这篇文章能帮到你,在和好朋友分享的时候,也欢迎感兴趣一起来探讨。
关键词:
《厦门市排水管理办法》实施以来 查处违法排水行为38起 当前速讯
2023-06-15当前速看:PS+6月美服二三档阵容公布:《孤岛惊魂6》、《忍者神龟:施莱德的复仇》等
2023-06-15世界热点评!精锻科技(300258):6月14日北向资金增持9.68万股
2023-06-15全球热头条丨鲁大师测出的硬件信息是否准确(怎么利用鲁大师 测出自己的网速)
2023-06-15