Question

求斐波那契数列20项中的所有素数,斐波那契数列前两项从2,3开始,要求用数组

Answer 1

用 fortran 写了9行代码。

一共有 7 项输出。分别是数组第 1、2、3、5、9、11、15 项。

附：fortran 代码和运行结果

Answer 2

#include <stdio.h>

int isprime(unsigned long n)

{

unsigned long i;

if(n<2)

return 0;

for(i=2;i*i<=n;++i)

if(n%i==0)

return 0;

return 1;

}

int main()

{

unsigned long a[20]={2,3},i;

for(i=0;i<20;++i)

{

if(i>1)

a[i]=a[i-1]+a[i-2];

if(isprime(a[i]))

printf("%lu\n",a[i]);

}

return 0;

}