\(C_{ai}\)问题之\(AI\)证明

蔡家雄 · 发表于 2025-12-12 14:24

模 173 的平方剩余奇质数之一是 113，

求 \(x^2 - 173*y^2= 113\) 的正整数解，，

蔡家雄 · 发表于 2025-12-12 14:25

模 173 的平方剩余奇质数之一是 113，

求 \(x^2 - 173*y^2= - 113\) 的正整数解，，

ysr · 发表于 2025-12-12 14:30

蔡家雄发表于 2025-12-12 06:24
模 173 的平方剩余奇质数之一是 113，

求 \(x^2 - 173*y^2= 113\) 的正整数解，，

请输入一个数字：10000000
x= 1631 y= 124
x= 86599 y= 6584
请输入一个数字：

ysr · 发表于 2025-12-12 14:31

蔡家雄发表于 2025-12-12 06:25
模 173 的平方剩余奇质数之一是 113，

求 \(x^2 - 173*y^2= - 113\) 的正整数解，，

请输入一个数字：10000000
x= 38 y= 3
x= 3646878 y= 277267
请输入一个数字：

蔡家雄 · 发表于 2026-1-4 17:29

模 173 的平方剩余奇质数之一是 137，

求 \(x^2 - 173*y^2= 137\) 的正整数解，，

蔡家雄 · 发表于 2026-1-4 17:30

模 173 的平方剩余奇质数之一是 137，

求 \(x^2 - 173*y^2= - 137\) 的正整数解，，

ysr · 发表于 2026-1-5 08:44

蔡家雄发表于 2026-1-4 09:29
模 173 的平方剩余奇质数之一是 137，

求 \(x^2 - 173*y^2= 137\) 的正整数解，，

请输入一个数字：10000000
x= 7997 y= 608
x= 21413 y= 1628
请输入一个数字：

ysr · 发表于 2026-1-5 08:52

本帖最后由 ysr 于 2026-1-5 00:55 编辑

蔡家雄发表于 2026-1-4 09:30
模 173 的平方剩余奇质数之一是 137，

求 \(x^2 - 173*y^2= - 137\) 的正整数解，，

请输入一个数字：100000000
x= 6 y= 1
x= 17881286 y= 1359489
x= 47879474 y= 3640209

ysr · 发表于 2026-1-15 13:08

本帖最后由 ysr 于 2026-1-15 05:16 编辑

素数是：序号m=1 5
素数是：序号m=2 11
素数是：序号m=3 19
素数是：序号m=4 29
素数是：序号m=5 41
素数是：序号m=7 71
素数是：序号m=8 89
素数是：序号m=9 109
素数是：序号m=10 131
素数是：序号m=12 181
素数是：序号m=14 239
素数是：序号m=15 271
素数是：序号m=18 379
素数是：序号m=19 419
素数是：序号m=20 461
素数是：序号m=23 599
素数是：序号m=25 701
素数是：序号m=27 811
素数是：序号m=29 929
素数是：序号m=30 991
素数是：序号m=34 1259
素数是：序号m=37 1481
素数是：序号m=38 1559
素数是：序号m=40 1721
素数是：序号m=43 1979
素数是：序号m=44 2069
素数是：序号m=45 2161
素数是：序号m=47 2351
素数是：序号m=49 2549
素数是：序号m=52 2861
素数是：序号m=53 2969
素数是：序号m=54 3079
素数是：序号m=55 3191
素数是：序号m=58 3539
素数是：序号m=59 3659
素数是：序号m=63 4159
素数是：序号m=64 4289
素数是：序号m=65 4421
素数是：序号m=67 4691
素数是：序号m=69 4969
素数是：序号m=75 5851
素数是：序号m=82 6971
素数是：序号m=84 7309
素数是：序号m=85 7481
素数是：序号m=88 8009
素数是：序号m=92 8741
素数是：序号m=93 8929
素数是：序号m=95 9311
素数是：序号m=99 10099
素数是：序号m=100 10301
素数是：序号m=102 10711
素数是：序号m=113 13109
素数是：序号m=114 13339
素数是：序号m=119 14519
素数是：序号m=124 15749
素数是：序号m=125 16001
素数是：序号m=129 17029
素数是：序号m=130 17291
素数是：序号m=133 18089
素数是：序号m=137 19181
素数是：序号m=139 19739
素数是：序号m=140 20021
素数是：序号m=143 20879
素数是：序号m=144 21169
素数是：序号m=147 22051
素数是：序号m=148 22349
素数是：序号m=152 23561
素数是：序号m=153 23869
素数是：序号m=154 24179
素数是：序号m=157 25121
素数是：序号m=158 25439
素数是：序号m=159 25759
素数是：序号m=162 26731
素数是：序号m=163 27059
素数是：序号m=168 28729
素数是：序号m=170 29411
素数是：序号m=173 30449
素数是：序号m=175 31151
素数是：序号m=179 32579
素数是：序号m=180 32941
素数是：序号m=183 34039
素数是：序号m=185 34781
素数是：序号m=187 35531
素数是：序号m=190 36671
素数是：序号m=192 37441
素数是：序号m=194 38219
素数是：序号m=195 38611
素数是：序号m=198 39799
素数是：序号m=202 41411
素数是：序号m=205 42641
素数是：序号m=208 43889
素数是：序号m=214 46439
素数是：序号m=217 47741
素数是：序号m=218 48179
素数是：序号m=219 48619
素数是：序号m=224 50849
素数是：序号m=229 53129
素数是：序号m=230 53591
素数是：序号m=232 54521
素数是：序号m=235 55931
素数是：序号m=239 57839
素数是：序号m=240 58321
素数是：序号m=243 59779
素数是：序号m=245 60761
素数是：序号m=247 61751
素数是：序号m=257 66821
素数是：序号m=258 67339
素数是：序号m=262 69431
素数是：序号m=263 69959
素数是：序号m=264 70489
素数是：序号m=267 72091
素数是：序号m=280 79241
素数是：序号m=284 81509
素数是：序号m=287 83231
素数是：序号m=289 84389
素数是：序号m=293 86729
素数是：序号m=295 87911
素数是：序号m=297 89101
素数是：序号m=300 90901
素数是：序号m=302 92111
素数是：序号m=304 93329
素数是：序号m=305 93941
素数是：序号m=308 95789
素数是：序号m=313 98909
共有123个

ysr · 发表于 2026-1-15 13:18

代码如下：

Private Function fenjieyinzi(sa As String) As String
Dim x, A, B
x = sa
B = Int(Sqr(Val(x)) / 2)
If x = 3 Or x = 2 Then
A = True
Else
If x Mod 2 = 0 Then
A = False
Else

For I = 3 To 2 * B + 1 Step 2
If x Mod I = 0 Then
A = False
Exit For

Else: A = True

End If
Next
End If
End If
If A = True Then
fenjieyinzi = "这是个素数"
Else
fenjieyinzi = "2*2"
End If

End Function

Private Sub Command1_Click()
Dim m
Do While m <= 314
s = m ^ 2 + 3 * m + 1
s1 = fenjieyinzi(Val(s))
If InStr(Trim(s1), "*") = 0 Then

m1 = m1 & "素数是：" & "序号m=" & m & " " & s & vbCrLf
s2 = s2 + 1

End If

m = m + 1
Loop
Text1 = m1 & "共有" & s2 - 1 & "个"

End Sub

Private Sub Command2_Click()
Text1 = ""

End Sub

		自动登录	找回密码
密码			注册

\(C_{ai}\)问题之\(AI\)证明

点评

评分

浏览过的版块