新年快乐！！！

王守恩

\(2026=U_{1}^2+V_{1}^1-W_{1}^2=U_{2}^2+V_{2}^2-W_{2}^2=U_{3}^2+V_{3}^3-W_{3}^2=\cdots=U_{i}^2+V_{i}^i-W_{i}^2=\cdots=U_{2026}^2+V_{2026}^{2026}-W_{2026}^2\)

\(说明:  U_{i},V_{i},W_{i} = 互不相同正整数。\)

ysr

2026=46^2+31-11^2

ysr

2026=47^2+91^2-92^2

ysr

2026=51^2+1^3-24^2=51^2+29^3-158^2
51^2-2026=2601-2026=575

ysr

2026=51^2+1^4-24^2=51^2+1^5-24^2=……=51^2+1^n-24^2

ysr

用程序求出来的，代码如下：
Private Sub Command1_Click()
Dim a, b
a = Val(Text1)
s = 24
Do While s <= 5000000
b = Val(s ^ 2 - a)
b1 = b ^ (1 / 3)
If InStr(b1, ".") = 0 Then
s1 = s1 & a & "+" & b1 & "^3=" & s & "^2" & vbCrLf
Else
s1 = s1
End If
s = s + 1
Loop

If InStr(s1, "^") = 0 Then
Text2 = "wu  jie"
Else
Text2 = s1
End If

End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""

End Sub

王守恩

ysr 发表于 2026-1-1 15:48
2026=51^2+1^4-24^2=51^2+1^5-24^2=……=51^2+1^n-24^2

\(2026=U_{1}^2+V_{1}^1-W_{1}^2=U_{2}^2+V_{2}^2-W_{2}^2=U_{3}^2+V_{3}^3-W_{3}^2=\cdots=U_{i}^2+V_{i}^i-W_{i}^2=\cdots=U_{2026}^2+V_{2026}^{2026}-W_{2026}^2\)

\(说明:  U_{i},V_{i},W_{i} = 互不相同正整数。\) ——  一共需要 2026 × 3 个不同的正整数。

ysr

2026=46^2+31-11^2=47^2+91^2-92^2=51^2+29^3-158^2

ysr

2026=46^2+31-11^2=47^2+91^2-92^2=51^2+29^3-158^2=53^2+1^4-28^2

ysr

2026=54^2+71^3-599^2