codeblocks下fortran编程判断素数

来源:网络时间:2015-12-17 17:05:05

  【创建fortran工程】

codeblocks下fortran编程判断素数的技巧
codeblocks下fortran编程判断素数的技巧
codeblocks下fortran编程判断素数的技巧
codeblocks下fortran编程判断素数的技巧
codeblocks下fortran编程判断素数的技巧

  【编写代码】

  program main

  implicit none

  integer::a,i,flag

  flag=1

  read *,a

  do i=2,a-1

  if(mod(a,i)==0)then

  flag=0

  exit

  end if

  end do

  if(flag==1)then

  print *,a,"是素数"

  else

  print *,a,"不是素数"

  end if

  end

  【在codeblocks中编译、链接】

codeblocks下fortran编程判断素数的技巧

  【运行、测试结果】

codeblocks下fortran编程判断素数的技巧

文章内容来源于网络,不代表本站立场,若侵犯到您的权益,可联系我们删除。(本站为非盈利性质网站) 联系邮箱:9145908@qq.com