显示1-1个结果(共1个)。
第页1
数字k,其中数字和(k)+数字和(k^2)+数字(k^3)=数字和(k^4)。
+0 1
0, 162, 171, 351, 468, 558, 1620, 1710, 2106, 3321, 3510, 4023, 4680, 5121, 5247, 5544, 5580, 5868, 8001, 10008, 10071, 10224, 10305, 10503, 10818, 11025, 11241, 11511, 12321, 12654, 12888, 13239, 14004, 14301, 15471, 15876, 16011, 16200, 16218, 17100
例子
162是一个术语,因为s(162)=9,s(162^2)=18,s(161^3)=27,s(62^4)=54和9+18+27=54。
数学
选择[Range[0,20000],Sum[i*(DigitCount[#][[i]]+DigitCoont[#^2][[i]]+DigetCount[#^3][[i]]),{i,1,9}]=总和[i*数字计数[#^4][i],{i、1、9}]&](*斯特凡·斯坦纳伯格2006年5月4日*)
s[n_]:=加@@整数位数@n; 选择[Range[0,16217],s@#+s[#^2]+s[#^3]==s[##^4]&](*罗伯特·威尔逊v2006年5月4日*)
并行[While[True,If[Total[Integer Digits[n]]+Total[Cinteger Diges[n^2]]+Toll[CintegerDigits[Cn^3]]==Total[整数位数[n^4],打印[n]];n++];n)(*J.W.L.(一月)埃兰2021年12月25日*)
黄体脂酮素
(PARI)是(n)=我的(s=总和);s(n)+s(n^2)+s\\安德斯·赫尔斯特罗姆2015年9月16日
(PARI)选择(isA118470(n)={和位数(n)+和位数(n^2)+和数(n^3)==和位数(n^4)},[0..1000])\\J.W.L.(一月)埃兰2021年12月25日
(Python)
def-sd(n):返回和(map(int,str(n)))
def-ok(n):返回sd(n)+sd(n**2)+sd(n**3)==sd(n**4)
打印([k表示范围(20000)内的k,如果ok(k)])#迈克尔·布拉尼基2021年12月25日
作者
Luc Stevens(lms022(AT)yahoo.com),2006年5月4日
搜索在0.004秒内完成
|