windows平台下fortran编程实现求阶乘

1、关于codeblocks IDE的极速安装

请参考百度经验<<Windows下极速搭建fortran开发环境>>

2、fortran编程实现求阶乘

源代码如下：

    implicit none

    integer::i,n,m

    m=1

    read *,n

    do i=1,n

        m=m*i

    end do

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

3、编译、运行，结果如下：