%I#10 2021年8月23日21:44:56
%电话:801081802082803038380408480508580608680708780800880,
%电话:9089801008108010818180208128013081801418081580,
%电话:1608168017081780180018801908198020082080
%N数字k,使得0和8并列出现在k的十进制表示中,但不出现在k-1中。
%t SequencePosition[Table[If[SequenceCount[IntegerDigits[n],{0,8}]>0||SequenceCount[Integer Digits[0],{8,0}]>0,1,0],{n,2100}],{0,1}][[All,2](*需要Mathematica版本10或更高版本*)(*Harvey P.Dale_,2017年1月21日*)
%K nonn,基础
%O 1,1号机组
%百灵鸟金伯利_
|