求出2~1000之间长度最长的、成等差数列的素数（质数）。

     例如：在2~50之间的全部素数有

        2, 3, 5, 7, 11, 13, 17, 19, 23, 29, 31, 37, 41, 43, 47

   其中公差为1的素数数列为2, 3，其长度为2

       公差为2的素数数列为3, 5, 7，其长度为3

        ……

   程序要求：输出满足条件的素数数列。

     [算法提要]：首先用筛选法求出此范围内的全部素数，存放在数组B中，然后用2个变量i,j，逐步求出满足条件的素数数列。

      程序:      Max := 0; num := 1000;

                 For i := 2 to num do 

                  b[i] := i;

                 ENDFOR

                  For i := 2  to   ______①______ do

                   If  _____②_____   then

                                       k := i + i;

                       While k <= num do

                          B[k] := 0;

                            K := k + i

                          ENDWHILE;

                          ENDIF;

                        ENDFOR;

                       For i := 2  to  num - 1 do

                        If ____