搜索: 编号:a075247
|
|
|
|
12, 6, 20, 42, 210, 42, 90, 240, 1122, 156, 468, 812, 3660, 420, 510, 2070, 9120, 930, 1806, 4422, 19182, 1806, 2100, 8372, 35910, 3192, 9048, 14520, 61752, 5256, 9900, 23562, 99540, 8190, 22940, 36290, 152490, 12210, 6314, 53592, 224202, 17556
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
3, 1
|
|
评论
|
|
|
链接
|
|
|
例子
|
对于n=6,我们有a(n)=42,在4/n=2/3=1/x+1/y+1/z的整数解中,最大可能的z。事实上,从1/x<2/3<3/x,我们有3/2<x<9/2。对于x=2,我们得到2/y>2/3-1/2=1/6>1/y<=>6<y<12,除y=11外,每个y都会得到一个解,其中z=42、24、18、15和12。没有其他可能的z值:x=3给出2/y>1/3<=>y<6,实际上y=4给出z=12的解,y=5没有解;最后,x=4给出了2/y>5/12<=>y<24/5,而y>x是不可能的。
|
|
MAPLE公司
|
A075247号:=proc()局部t,n,a,b,t1,largey,largez;对于从3到100的n,dot:=4/n;大z:=0;对于从地板(1/t)+1到地板(3/t)的a,执行t1:=t-1/a;对于b从max(a,floor(1/t1)+1)到floor(2/t1)do if ` and `(type(1/(t1-1/b),integer),a<b,b<1/(t1-1/b)),然后如果largez<1/;lprint(n,largez)end-do-end-proc;#[程序派生自A192787号]帕特里克·麦克纳布2014年8月20日
|
|
数学
|
对于[xLst={};yLst=};zLst=[};n=3,n<=100,n++,cnt=0;xr=n/4;如果[IntegerQ[xr],x=xr+1,x=Ceiling[xr]];而[yr=1/(4/n-1/x);如果[IntegerQ[yr],y=yr+1,y=上限[yr]];cnt==0&y>x,而[zr=1/(4/n-1/x-1/y);cnt==0.&zr>y,如果[IntegerQ[zr],z=zr;cnt++;附加到[xLst,x];附加到[yLst,y];附加到[zLst,z]];y++];x++]];zL标准
|
|
黄体脂酮素
|
(PARI)适用({A075247号(n,c=1,t)=对于(x=n\4+1,3*n\4,对于(y=max(1\t=4/n-1/x,x)+1,ceil(2/t)-1,t-1/y>=c&&break;分子(t-1/y)==1&&c=t-1/y;1/c},[3..99])\\M.F.哈斯勒2022年7月2日
|
|
交叉参考
|
|
|
关键字
|
坚硬的,美好的,非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.003秒内完成
|