搜索： a062003-编号：a062003
|
| |
| |
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 252, 403, 574, 765, 976, 1207, 1458, 1729, 40, 252, 22, 736, 1008, 1300, 1612, 1944, 2296, 2668, 90, 403, 736, 33, 1462, 1855, 2268, 2701, 3154, 3627, 160, 574, 1008, 1462, 44, 2430, 2944, 3478, 4032, 4606, 250, 765, 1300
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
链接
|
|
|
|
例子
|
a（12）=12*21=252。
|
|
|
数学
|
表[Times@@Union[FromDigits/@Permutations[IntegerDigits[n]]]，{n，60}](*哈维·P·戴尔2023年4月6日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,容易的,基础
|
|
|
作者
|
|
|
|
扩展
|
更多来自Larry Reeves（larryr（AT）acm.org）的术语，2001年5月30日
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
|
|
|
0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 121, 252, 403, 574, 765, 976, 1207, 1458, 1729, 40, 252, 484, 736, 1008, 1300, 1612, 1944, 2296, 2668, 90, 403, 736, 1089, 1462, 1855, 2268, 2701, 3154, 3627, 160, 574, 1008, 1462, 1936, 2430, 2944, 3478, 4032, 4606, 250
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
0,3
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
a（10）=10*01=10，a（11）=11*11=121，a（12）=12*21=252。
|
|
|
黄体脂酮素
|
（ARIBAS）：函数排列（s:string）：数组；var i，k：整数；st1，st2：堆栈；ele，ws:string；开始stack_push（st2，s[0..0]）；对于i:=1到长度（s）-1 do，而不是stack_empty（st2）do stack_push（st1，stack_pop（st2））；结束；ele:=s[i]；当长度（st1）>0 do ws:=stack_pop（st1）时；对于k:=0到长度（ws）-1，执行stack_push（st2，concat（ws[0..k-1]，ele，ws[k.]））；结束；stack_push（st2，concat（ws[0]，ele））；结束；结束；返回堆栈2阵列（st2）；结束；函数int_permute（n:整数）：数组；var s：字符串；ar：数组；i： 整数；开始s：=itoa（n）；ar:=排列；对于i:=0到长度（ar）-1做ar[i]：=atoi（ar[i]]）；结束；返回ar；结束；对于k:=0到55，请写（乘积（int_permute（k）），“”）；结束；
|
|
|
交叉参考
|
|
|
|
关键词
|
基础,容易的,非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A179055号
|
| 数k，使得由k的循环排列数字构成的所有数字的乘积是平方。 |
|
+10
0
|
|
|
|
1, 4, 9, 11, 22, 33, 44, 55, 66, 77, 88, 99, 243, 324, 432, 567, 675, 756, 1000, 1010, 1020, 1030, 1040, 1050, 1060, 1070, 1080, 1090, 1111, 1212, 1313, 1414, 1515, 1616, 1717, 1818, 1919, 2000, 2010, 2020, 2030, 2040, 2050, 2060, 2070, 2080, 2090, 2121, 2222, 2323, 2424
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
链接
|
|
|
|
例子
|
756在序列中，因为756*567*675=289340100=17010^2。
|
|
|
MAPLE公司
|
with（numtheory）：对于从1到4000的n do:pp:=1:n0:=n:l:=长度（n0）：ind:=0:对于
j从1到l do:s:=0：对于m从1到ldo:q:=n0:u:=irem（q，10）：v:=iquo（q，100）：n0:=v
：s：=s+u*10^m：od：s：=floor（s-u*10 ^l+u）：n0：=s：pp：=pp*s：od：x：=sqrt（pp）：y：=floor（x）：如果
x=y然后打印f（`%d，`，n）：否则fi:od:
|
|
|
数学
|
cycDigitPerms[n_Integer，b_10]：=模块[{list={n}，数字=整数数字[n，b]，len，counter，holder，next}，len=长度[数字]；计数器=1；而[counter<len，holder=数字[[-1]]；digits=删除[数字，-1]；digits=插入[digits，holder，1]；list=追加[list，FromDigits[digits，b]]；计数器++]；返回[list]]；选择[Range[2000]，IntegerQ[Sqrt[Times@@cycDigitPerms[#]]&](*阿隆索·德尔·阿特，2011年1月4日*）
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.007秒内完成
|
