登录
最小的k,使得8^k在十进制表示中正好有n个4。
0

%I#8 2024年2月25日11:01:21

%S 1,2,6,14,26,35,39,37,58,46,66103,73,93126124,88107105173150,

%电话146214194193168170229232210275248313332276300303317,

%电话:263314306398376422416444421394410449453

%N最小的k,使得8^k的十进制表示形式正好是N 4。

%t a={};Do[k=1;While[Count[Integer Digits[8^k],4]!=n、 k++];a=附加[a,k],{n,0,50}];

%t模块[{nn=500,tbl},tbl=Table[{k,DigitCount[8^k,10,4]},{k,nn}];表[SelectFirst[tbl,#[2]]==n&],{n,0,50}][[;;,1]](*_哈维P.戴尔,2024年2月25日*)

%K基,nonn

%0、2

%A _Robert G.Wilson v_,2001年8月10日

%E姓名由Jon E.Schoenfield_2018年6月26日更正