5 P=110 while P<9999999999 and P>020 P=nxtprm(P)30 N=17*P+62540 Sr=int(sqrt(N)+0.5)50 if Sr*Sr=N then print P;60 wend
finds only 3 and 67 by the time the program was stopped at p = 82,150,333.
blackjack
flooble's webmaster puzzle