使用 SUM 内部函数时出错
使用 g95 编译器时，我收到一条错误消息： ERROR: Procedure attribute conflicts with INTENT attribute in 'quantityarray' 我试图查找数组的总和。…
从文件读取并存储在数组中时出现问题
使用 g96 编译器时，我收到一条错误消息： INTENT(OUT) at variable 'SIZE' is never set. 下面是我的子例程。你知道我该如何修复这个错误吗？非常感…
在 Fortran 95 中读取多个文件
我正在用 Fortran 95 编写代码，以读取许多类似于 1.dat、2.dat、......、9999.dat 的文件。我有一个代码，读取 0001.dat、0002.dat、....... 9999.da…
Fortran 95 Do-While 循环在错误条件下不退出
这是我的代码： program change integer:: amount, remainder, q, d, n, p amount = 47 remainder = amount print*,remainder q = 0 d = 0 n = 0 p = …
Fortran 95：if 条件的内联计算
这里有一小段代码，返回 epsilon() 以获得实际值： program epstest real :: eps=1.0, d do d=1.0+eps if (d==1.0) then eps=eps*2 exit else eps=eps…
fortran90中整数的智能打印
几年前简单介绍了Fortran77之后，我开始学习Fortran90。在 Fortran 中打印整数时，必须指定要为打印整数保留多少个空格。考虑这个程序... implicit no…
