codeblocks下fortran编程实现求阶乘

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

  fortran编程实现求阶乘

  源代码如下:

  implicit none

  integer::i,n,m

  m=1

  read *,n

  do i=1,n

  m=m*i

  end do

  print *,"阶乘结果为:",m

codeblocks下fortran编程实现求阶乘的窍门

  编译、运行,结果如下:

codeblocks下fortran编程实现求阶乘的窍门
文章内容来源于网络,不代表本站立场,若侵犯到您的权益,可联系我们删除。(本站为非盈利性质网站) 联系邮箱:rjfawu@163.com