用Fortran 如何编这个程序

第一种方法：

1. 建立工作目录/ ]"

2. 将ABAQUS安装判败目录\6.4-pr11\site下的aba_param_dp.inc 或 aba_param_sp.inc拷贝到工作目录，并改名为aba_param.inc；

3. 将编译的fortran程序拷贝到工作目录；

4. 将.obj文件拷贝到工作目做裂录；

5. 建立好输入文件.inp；

6. 运行abaqus job=inp_name user=fortran name即可。

第二种方法：掘胡颤

在Job模块里，创建工作，在Edit Job对话框中选择General选项卡，在User subroutine file中点击Select按钮，从d出对话框中选择你要调用的子程序文件（后缀为.for或.f）。

假设没粗1角需要x个，2角y个，5角z个，那么满足要求的条件是，

      x+2y+5z= 10，

其中，0≤x≤10，0≤y≤5，0≤z≤2，且 x，y，z 均为正整数. 因此最直观的程序可以写成

program money_assignment

implicit none

integer  x, y, z, id

  write(*,*)

  write(*,*) ' 方法号   1角硬币个数    2角硬币个数   5角硬币个咐族数'

  

  id = 0

  do z = 0, 2

    do y = 0, 5

      do x = 0, 10

        枯简镇if ( (x+2*y+5*z) == 10 ) then

          id = id + 1

          write(*,999) id, x, y, z

        end if

      end do

    end do

  end do

999 format( 3x,i2,10x,i2, 2(13x,i2) )

end program money_assignment

题目要求用子程序，直接将program改成subroutine即可。

Fortran源自于“公式翻译”（英语：FormulaTranslation）的缩写，是一种编程语言。

它是世界上芦肢世最早出现的计算机高级程序设计语言，广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。

随着FORTRAN语言版本的不断更新和变化，饥旅语言不兼容性问题日益突出，语言标准化工作被提上了日程。

1962年5月：美国标准化协会(简称ANSI)着手进行FORTRAN语言标准化的研究工作。

1966年：ANSI正式公布了两个标准文本：美国国家标准FORTRAN(ANSI X3.9-1966)和美国国家标准基本FORTRAN(ANSI X3.10-1966)，前者相当于FORTRAN Ⅳ，后者相当于FORTRANⅡ。基本FORTRAN是美国国家标准FORTRAN的一个子集，从而实现了语言的向下兼容，初步解决了语言的兼陪肢容性问题。

---