寻找更长的素数链条
欧拉给的二次三项式：x^2+x+P,当P=41时，x取0，至39时二次三项式的值皆为素数。
我搜寻了10亿内，除了此二次三项式最长以外，在就是，当P=17时，x取0，至15时二次三项式的值皆为素数。
其他的都在11项以内，它的特点是，每次递增偶数2n是素数，即数列0,2,4,6,8,10，......，2n（这是邻距，即素数链条前后两个素数的差值），这里所说的素数链条是指：x^2+x+P式子中，x从0到1,2,3，....，n时连续，即数列中，每个素数都可以用统一的二次三项式x^2+x+P表示，切x的取值连续（为非负整数）。
      根据其特点，我们可以先寻找孪生素数对，它们间隔为2（为链条中的前两项），继续增加链条长度，把末尾素数+4（即链条中的第三项），实际上它们是最密3生素数（P，P+2，P+6）；接着继续扩大战果，在末素上+6，看它是否为素数，是，在此基础上+8，.....一直+2n（都是在前一个末素上加，不是第一个素数P上加2n，否则一个你也搜寻不到，因为到第三项就会夭折）。
     搜寻更长，更多的那样素数链条，有统一二次三项式x^2+x+P表达式的素数链条（x值连续）。

SELECT 1
USE d:\二次等差素数数列\素数表.DBF ALIAS 素数表
SELECT 2
USE d:\二次等差素数数列\二次等差三生.DBF ALIAS 三生素数表
kssj=SECONDS()
For i=1 to 50876000
      @ 5,12 say i
     SELECT 1
     PUBLIC A
     A=素数
     jl=recno() &&记录指针位置
   
     skip
     PUBLIC B
     B=素数
     
     skip
     PUBLIC C
     C=素数
    cj1=B-A
    cj2=C-B
    IF cj1=2 AND cj2=4
         SELECT 2
         APPEND BLANK     &&增加一条空记录
         REPLACE 三生素 WITH C     
         REPLACE 记录3 WITH jl+2
    ENDIF
      
      SELECT 1
      GO jl+1
   
   ENDFOR
    =MESSAGEBOX("运行时间："+LTRIM(STR(INT((SECONDS()-kssj)/60)))+"分"+LTRIM(STR(MOD(SECONDS()-kssj,60),5,2))+"秒",64,"运行时间提示")
用vfp程序做的开始，非vb6语言。
这是在素数表中（10亿素数表）直接搜寻符合三个条件的素数链条，即x=0，x=1，x=2时的素数链条，标记了最后一个素数所在位置（素数表中的记录值），在此基础上+6，就是第四个素数，在继续加下去，直到保存表没有多少记录为止，也可以用最后一个素数+2n后，直接判断（不从素数表中搜寻）。

给的答案超出了我的想象。

这个版块比较冷清，有一个参与者，已经很不错了。

一个好的管理者，肯定是想各种方法把激情给搞起来。虽然这个网站有光求人，不助人的，一般情况下，不作为版主候选人，我觉着，如果，一个人能给一个问题，把此专版搞得活跃起来，也可以考虑版主候选人的资。

百分英雄榜，在vfp版块，我结贴了，因为除了一人，没有人，参与各抒己见。

什么也不说，什么也不做，天地人间自然宽。

人的灵感与自己的心情绑定！

我的所有灵感，都来自于对数学的兴趣，甚至是嗜好，那种离开数学，啥也不是的那种。

快两个月了，帖子量，及质量也没见增长。