fortran程序求教

执行 a(i,j)=1 这一句的时候，刚跳出 j 的循环， j 应该等于6的，给a(i,j)赋值应该会有问题

另外输出的时候((a(i,j),i=1,5),i=1,5)，两个都是 i ，没问题么？

明知故问。鄙视楼主

Program

>

Fortran程序是可以跨平台的，因为Fortran编译器可用于多个 *** 作系统。但是，由于不同 *** 作系统之间的二进制文件格式和库文件格式不同，因此在不同 *** 作系统之间运行Fortran程序需要进行一些修改和配置。

如果你想在Linux上编写Fortran程序并在Windows上运行它，可以按照以下步骤 *** 作：

使用跨平台的Fortran编译器：你可以使用跨平台的Fortran编译器，例如GNU Fortran、Intel Fortran等。这些编译器可用于多个 *** 作系统，因此可以生成可在不同 *** 作系统上运行的程序。

确保代码可移植：在编写Fortran代码时，应确保代码可移植，以便在不同 *** 作系统上运行。这包括使用标准的Fortran语法、避免使用平台特定的代码等。

编译程序：在Linux上使用Fortran编译器编译程序时，应将生成的可执行文件命名为exe扩展名（例如myprogramexe）。这是因为在Windows上，可执行文件需要具有扩展名才能正确运行。

拷贝可执行文件和所需的库文件：将生成的可执行文件和所需的库文件（例如dll文件）拷贝到Windows上。请注意，在Windows上运行Fortran程序需要安装相应的Fortran运行时库文件。你可以从Fortran编译器的官方网站上下载和安装这些库文件。

请注意，尽管Fortran程序是可移植的，但在不同 *** 作系统上运行时可能会遇到一些问题，例如文件系统路径、命令行参数等。在将Fortran程序从Linux转移到Windows时，建议进行测试并进行必要的修改和配置，以确保程序能够正确运行。

问题1：

1006 FORMAT(/5X,'NOODL COORL IHATES'/

& 5X,'NOOD',6X,1HX,9X,IHY/)

这里的 IHY 是否应该是 1HY ？？？

问题2：

1003 FORMAT(/5X,'ELEMENT DEFINITIONS'/

& 5X,'ELEMENT',2X,'NOOD1',2X,'NOOD2',2N/)

这里的 2N 非法，Fortran里没有 N 编辑符。是否应该是 2X ？

PS：建议不要使用 H 编辑符，在新语法里，这个编辑符被弃用了。

module q

定义模块

implicit none

interface operator(lower)

module procedure zimu

end interface

用接口实现 *** 作符重载或定义

contains

模块函数

function zimu(str)result(str_rst)

函数名叫zimu，result（）用来定返回值名称

character(len=80),intent(in)::str

声明输入变量，长度80的字符串，属性为输入，就是不能改变这个量的值

character(len=80)::str_rst

integer::i

do i=1,len(str)

if(str(i:i)<='Z'andstr(i:i)>='A')then

str_rst(i:i)=char(ichar(str(i:i))+32)

如果字母为大写，取出其asc码，加32后变为小写字母asc码，再转换回字符

else

str_rst(i:i)=str(i:i)

end if

end do

end function zimu

end module q

program w

use q 使用模块

character(len=80)::letter

print,'input words:' 输出提示行

read,letter 读入字符串

print,zimu(letter)

调用zimu函数，改成lowerletter也可以

end program w

以上就是关于fortran程序求教全部的内容，包括:fortran程序求教、fortran 程序(应该是很简单的小程序)、linux的fortran可以转windows等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！