Chowla numbers: Difference between revisions
Content added Content deleted
(→More Cowbell: corrected missing final line of output) |
m (→More Cowbell: deleted unused fragment of performance timing code) |
||
Line 1,005: | Line 1,005: | ||
Next |
Next |
||
count = 0 |
count = 0 |
||
Dim p As BigInteger, k As BigInteger = 2, kk As BigInteger = 3 |
Dim p As BigInteger, k As BigInteger = 2, kk As BigInteger = 3 |
||
For i As Integer = 2 To 31 ' if you dare, change the 31 to 61 or 89 |
For i As Integer = 2 To 31 ' if you dare, change the 31 to 61 or 89 |
||
If {2, 3, 5, 7, 13, 17, 19, 31, 61, 89}.Contains(i) Then |
If {2, 3, 5, 7, 13, 17, 19, 31, 61, 89}.Contains(i) Then |