您的位置: 首页 > 软件教程 > codeblocks使用教程 > codeblocks下fortran编程如何使用子程序subroutine

codeblocks下fortran编程如何使用子程序subroutine

7.0分
出处:网络 时间:2015-12-17

您可能感兴趣的话题: CodeBlocks入门教程   编码方块  

核心提示:codeblocks下fortran编程使用子程序subroutine教程

  1、关于codeblocks IDE的极速安装

  参考教程:Windows下搭建fortran开发环境

  2、子程序的一般形式:subroutine xxxx(参数1,参数2.....)

  implicit none

  参数1类型

  参数2类型

  xxxxxx代码

  end subroutine xxxx

  3、编写子程序

  传入2个参数

  其中一个是字符串

  另一个是整数

  循环整数次,打印字符串

  程序结束时改变传入的整数值

  传入的参数有如下三种形式:

  intent(in):在子程序中不可改变值

  intent(out):可在子程序中改变

  intent(inout):可在子程序中改变

  =====================================

  !子程序

  subroutine dy2003310(strFileName, times)

  implicit none

  character(*),intent(in)::strFileName

  integer,intent(inout)::times

  integer::i

  do i=1,times

  print *, strFileName

  end do

  times=times+times

  end subroutine dy2003310

codeblocks下fortran编程如何使用子程序subroutine

  4、使用fortran的关键字contains

  contains是Fortran 90中新增的一个语法功能

  在module或者subroutine中

  可以用contains来包含其他的module或者subroutine

  编写主程序

  测试子程序是否能够改变传入的参数

  implicit none

  character(len=255)::str

  integer::n

  str="168"

  n=3

  print *, "*****************************************"

  print *, "子程序运行之前,n=",n

  call dy2003310(str,n)

  print *, "子程序运行之后,n=",n

  print *, "*****************************************"

codeblocks下fortran编程如何使用子程序subroutine
网友评论
精品软件课程
更多 >
C++是一种静态数据类型检查的,支持多重编程... [详细]
Java,是由Sun Microsystem... [详细]
C语言是一种面向过程的计算机程序设计语言。多... [详细]
Visual Basic是一种由微软公司开发... [详细]
Oracle Database,又名Orac... [详细]
Visual Basic.NET是从 Vis... [详细]