数学中国

用户名  找回密码
 注册
帖子
热搜: 活动 交友 discuz
楼主: ysr

朋友,请看一下重要启示!

[复制链接]
 楼主| 发表于 2023-2-8 23:23 | 显示全部楼层
'兔子数列程序
Private Function tzshulie(sa As String) As String
Dim a, B, c
a = Val(sa)
B = 0

Do While B <= a
b1 = Int((B + 1) / 2)
w = Val(((1 / 2 + Sqr(5) / 2) ^ B - (1 / 2 - Sqr(5) / 2) ^ B) / Sqr(5))
w = Int(w)
s1 = s1 & "/" & w
B = Val(B + 1)

Loop
tzshulie = s1
End Function
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-8 23:25 | 显示全部楼层
兔子数列前51项:

/0/1/1/2/3/5/8/13/21/34/55/89/144/233/377/610/987/1597/2584/4181/6765/10946/17711/28657/46368/75025/121393/196418/317811/514229/832040/1346269/2178309/3524578/5702887/9227465/14930352/24157817/39088169/63245986/102334155/165580141/267914296/433494437/701408733/1134903170/1836311903/2971215073/4807526976/7778742049/12586269025
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-8 23:32 | 显示全部楼层
有15组/231048455625=480675^2=25672050625+102688202500+102688202500=160225^2+320450^2+320450^2
/376106225625=613275^2=41789580625+167158322500+167158322500=204425^2+408850^2+408850^2
/461822180625=679575^2=51313575625+205254302500+205254302500=226525^2+453050^2+453050^2
/231048455625=480675^2=102688202500+25672050625+102688202500=320450^2+160225^2+320450^2
/231048455625=480675^2=102688202500+102688202500+25672050625=320450^2+320450^2+160225^2
/376106225625=613275^2=167158322500+41789580625+167158322500=408850^2+204425^2+408850^2
/376106225625=613275^2=167158322500+167158322500+41789580625=408850^2+408850^2+204425^2
/659628230625=812175^2=167158322500+205254302500+287215605625=408850^2+453050^2+535925^2
/659628230625=812175^2=167158322500+287215605625+205254302500=408850^2+535925^2+453050^2
/461822180625=679575^2=205254302500+51313575625+205254302500=453050^2+226525^2+453050^2
/659628230625=812175^2=205254302500+167158322500+287215605625=453050^2+408850^2+535925^2
/461822180625=679575^2=205254302500+205254302500+51313575625=453050^2+453050^2+226525^2
/659628230625=812175^2=205254302500+287215605625+167158322500=453050^2+535925^2+408850^2
/659628230625=812175^2=287215605625+167158322500+205254302500=535925^2+408850^2+453050^2
/659628230625=812175^2=287215605625+205254302500+167158322500=535925^2+453050^2+408850^2
/平方数75025^2的拆分解有:7组/75025^2=7785^2+74620^2
/75025^2=13420^2+73815^2
/75025^2=21007^2+72024^2
/75025^2=33553^2+67104^2
/75025^2=38544^2+64367^2
/75025^2=45015^2+60020^2
/75025^2=51000^2+55025^2
其中的75025为兔子数列中的一项
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 02:34 | 显示全部楼层
有15组/231048455625=480675^2=25672050625+102688202500+102688202500=160225^2+320450^2+320450^2
/376106225625=613275^2=41789580625+167158322500+167158322500=204425^2+408850^2+408850^2
/461822180625=679575^2=51313575625+205254302500+205254302500=226525^2+453050^2+453050^2
/231048455625=480675^2=102688202500+25672050625+102688202500=320450^2+160225^2+320450^2
/231048455625=480675^2=102688202500+102688202500+25672050625=320450^2+320450^2+160225^2
/376106225625=613275^2=167158322500+41789580625+167158322500=408850^2+204425^2+408850^2
/376106225625=613275^2=167158322500+167158322500+41789580625=408850^2+408850^2+204425^2
/659628230625=812175^2=167158322500+205254302500+287215605625=408850^2+453050^2+535925^2
/659628230625=812175^2=167158322500+287215605625+205254302500=408850^2+535925^2+453050^2
/461822180625=679575^2=205254302500+51313575625+205254302500=453050^2+226525^2+453050^2
/659628230625=812175^2=205254302500+167158322500+287215605625=453050^2+408850^2+535925^2
/461822180625=679575^2=205254302500+205254302500+51313575625=453050^2+453050^2+226525^2
/659628230625=812175^2=205254302500+287215605625+167158322500=453050^2+535925^2+408850^2
/659628230625=812175^2=287215605625+167158322500+205254302500=535925^2+408850^2+453050^2
/659628230625=812175^2=287215605625+205254302500+167158322500=535925^2+453050^2+408850^2
/平方数121393^2的拆分解有:4组/121393^2=11832^2+120815^2
/121393^2=54705^2+108368^2
/121393^2=62225^2+104232^2
/121393^2=65007^2+102520^2
其中121393是兔子数
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 10:11 | 显示全部楼层
不完美长方体是:  a=507544128 b=1015088254 c=3478759201 d=6976006259.18626 e=7778742049 f=3515589085.83034 g=7795282477.67507
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 10:13 | 显示全部楼层
不完美长方体是:  a=507544128 b=1015088254 c=3478759201 d=1134903170 e=3623833569.84712 f=3515589085.83034 g=3659203572.33896
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 10:21 | 显示全部楼层
/平方数10946^2的拆分解有:4组/10946^2=754^2+10920^2
/10946^2=3504^2+10370^2
/10946^2=4210^2+10104^2
/10946^2=4896^2+9790^2

其中10946是兔子数
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 10:23 | 显示全部楼层
/平方数17711^2的拆分解有:1组/17711^2=7761^2+15920^2
其中17711是兔子数
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 10:47 | 显示全部楼层
/平方数28657^2的拆分解有:1组/28657^2=12815^2+25632^2
/平方数75025^2的拆分解有:7组/75025^2=7785^2+74620^2
/75025^2=13420^2+73815^2
/75025^2=21007^2+72024^2
/75025^2=33553^2+67104^2
/75025^2=38544^2+64367^2
/75025^2=45015^2+60020^2
/75025^2=51000^2+55025^2
/平方数121393^2的拆分解有:4组/121393^2=11832^2+120815^2
/121393^2=54705^2+108368^2
/121393^2=62225^2+104232^2
/121393^2=65007^2+102520^2
/平方数196418^2的拆分解有:13组/196418^2=5168^2+196350^2
/196418^2=11518^2+196080^2
/196418^2=13080^2+195982^2
/196418^2=18232^2+195570^2
/196418^2=82110^2+178432^2
/196418^2=87840^2+175682^2
/196418^2=92432^2+173310^2
/196418^2=93810^2+172568^2
/196418^2=96960^2+170818^2
/196418^2=98318^2+170040^2
/196418^2=103768^2+166770^2
/196418^2=108120^2+163982^2
/196418^2=118800^2+156418^2
/平方数317811^2的拆分解有:13组/317811^2=49140^2+313989^2
/317811^2=60264^2+312045^2
/317811^2=64389^2+311220^2
/317811^2=66555^2+310764^2
/317811^2=75405^2+308736^2
/317811^2=113805^2+296736^2
/317811^2=122235^2+293364^2
/317811^2=128136^2+290835^2
/317811^2=166125^2+270936^2
/317811^2=171564^2+267525^2
/317811^2=179136^2+262515^2
/317811^2=180960^2+261261^2
/317811^2=219180^2+230139^2
几个兔子数的平方的拆分
回复 支持 反对

使用道具 举报

 楼主| 发表于 2023-2-9 11:17 | 显示全部楼层
不完美长方体是:a=85146110326225 b=222915410843904 c=583600122205489
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

LaTEX预览输入 教程 符号库 加行内标签 加行间标签 
对应的 LaTEX 效果:

Archiver|手机版|小黑屋|数学中国 ( 京ICP备05040119号 )

GMT+8, 2025-7-24 15:06 , Processed in 0.090565 second(s), 13 queries .

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表
\frac{\square}{\square}\sqrt{\square}\square_{\baguet}^{\baguet}\overarc{\square}\ \dot{\baguet}\left(\square\right)\binom{\square}{\square}\begin{cases}\square\\\square\end{cases}\ \begin{bmatrix}\square&\square\\\square&\square\end{bmatrix}\to\Rightarrow\mapsto\alpha\ \theta\ \pi\times\div\pm\because\angle\ \infty
\frac{\square}{\square}\sqrt{\square}\sqrt[\baguet]{\square}\square_{\baguet}\square^{\baguet}\square_{\baguet}^{\baguet}\sum_{\baguet}^{\baguet}\prod_{\baguet}^{\baguet}\coprod_{\baguet}^{\baguet}\int_{\baguet}^{\baguet}\lim_{\baguet}\lim_{\baguet}^{\baguet}\bigcup_{\baguet}^{\baguet}\bigcap_{\baguet}^{\baguet}\bigwedge_{\baguet}^{\baguet}\bigvee_{\baguet}^{\baguet}
\underline{\square}\overline{\square}\overrightarrow{\square}\overleftarrow{\square}\overleftrightarrow{\square}\underrightarrow{\square}\underleftarrow{\square}\underleftrightarrow{\square}\dot{\baguet}\hat{\baguet}\vec{\baguet}\tilde{\baguet}
\left(\square\right)\left[\square\right]\left\{\square\right\}\left|\square\right|\left\langle\square\right\rangle\left\lVert\square\right\rVert\left\lfloor\square\right\rfloor\left\lceil\square\right\rceil\binom{\square}{\square}\boxed{\square}
\begin{cases}\square\\\square\end{cases}\begin{matrix}\square&\square\\\square&\square\end{matrix}\begin{pmatrix}\square&\square\\\square&\square\end{pmatrix}\begin{bmatrix}\square&\square\\\square&\square\end{bmatrix}\begin{Bmatrix}\square&\square\\\square&\square\end{Bmatrix}\begin{vmatrix}\square&\square\\\square&\square\end{vmatrix}\begin{Vmatrix}\square&\square\\\square&\square\end{Vmatrix}\begin{array}{l|l}\square&\square\\\hline\square&\square\end{array}
\to\gets\leftrightarrow\nearrow\searrow\downarrow\uparrow\updownarrow\swarrow\nwarrow\Leftarrow\Rightarrow\Leftrightarrow\rightharpoonup\rightharpoondown\impliedby\implies\Longleftrightarrow\leftharpoonup\leftharpoondown\longleftarrow\longrightarrow\longleftrightarrow\Uparrow\Downarrow\Updownarrow\hookleftarrow\hookrightarrow\mapsto
\alpha\beta\gamma\Gamma\delta\Delta\epsilon\varepsilon\zeta\eta\theta\Theta\iota\kappa\varkappa\lambda\Lambda\mu\nu\xi\Xi\pi\Pi\varpi\rho\varrho\sigma\Sigma\tau\upsilon\Upsilon\phi\Phi\varphi\chi\psi\Psi\omega\Omega\digamma\vartheta\varsigma\mathbb{C}\mathbb{H}\mathbb{N}\mathbb{P}\mathbb{Q}\mathbb{R}\mathbb{Z}\Re\Im\aleph\partial\nabla
\times\cdot\ast\div\pm\mp\circ\backslash\oplus\ominus\otimes\odot\bullet\varnothing\neq\equiv\not\equiv\sim\approx\simeq\cong\geq\leq\ll\gg\succ\prec\in\ni\cup\cap\subset\supset\not\subset\not\supset\notin\not\ni\subseteq\supseteq\nsubseteq\nsupseteq\sqsubset\sqsupset\sqsubseteq\sqsupseteq\sqcap\sqcup\wedge\vee\neg\forall\exists\nexists\uplus\bigsqcup\bigodot\bigotimes\bigoplus\biguplus\bigcap\bigcup\bigvee\bigwedge
\because\therefore\angle\parallel\perp\top\nparallel\measuredangle\sphericalangle\diamond\diamondsuit\doteq\propto\infty\bowtie\square\smile\frown\bigtriangledown\triangle\triangleleft\triangleright\bigcirc \wr\amalg\models\preceq\mid\nmid\vdash\dashv\nless\ngtr\ldots\cdots\vdots\ddots\surd\ell\flat\sharp\natural\wp\clubsuit\heartsuit\spadesuit\oint\lfloor\rfloor\lceil\rceil\lbrace\rbrace\lbrack\rbrack\vert\hbar\aleph\dagger\ddagger

MathQuill输入:

Latex代码输入: