codeblocks下fortran编程实现求阶乘

源素网

  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编程实现求阶乘

免责声明:本文内容来自用户上传并发布或网络新闻客户端自媒体,源素网仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容,请联系删除。
https://www.guoji115.com/a/rjjc/196630.html