编辑
经核准的
Harvey P.Dale,<a href=“/A108977号/b108977.txt“>n表,n=1..1000时为a(n)</a>
选择[范围[0,500],PrimeQ[19#+17]&](*哈维·P·戴尔2022年9月23日*)
一:=程序选择(n)) 如果 -> i素数(19*n+17) 然后 n个 fi(菲涅耳) 结束: 序列(一(n个),n个=, [$0..500])[]; #Emeric Deutsch公司2005年8月3日
a: =proc(n),如果是i素数(19*n+17)=真的 然后是n其他的 fi端:seq(a(n),n=0..500)#Emeric Deutsch公司,2005年8月3日
检验过的
提出