・素数を産み出すプログラム               GAI 氏
 素数pを産み出す式は作れないが、
 p>2 なる自然数で、(p−2)!−1 がpで割り切れたら、pは素数
として、素数を並べられることは面白い。(→ 参考:「ライプニッツの定理」)
 PARI/GPでのプログラムで印すと、
            
  for(p=3,100,if(((p-2)!-1)%p==0,print1(p,",")))
            
で、素数
            
 3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97,・・・
が並んでいく。
                                            