CentOS上Fortran程序如何进行输入输出操作

在CentOS上编写和运行Fortran程序时，输入输出（I/O）操作通常使用Fortran的标准I/O库函数。以下是一些基本的步骤和示例，帮助你在CentOS上进行Fortran程序的输入输出操作。

1. 安装Fortran编译器

首先，确保你已经安装了Fortran编译器。常用的Fortran编译器是gfortran。你可以使用以下命令安装它：

sudo yum install gcc-gfortran

2. 编写Fortran程序

创建一个Fortran源文件，例如input_output_example.f90，并编写你的程序。以下是一个简单的示例程序，演示如何进行输入输出操作：

program input_output_example
    implicit none
    integer :: i
    real :: x, y, sum

    ! 提示用户输入两个数
    print *, "请输入两个数："
    read *, x, y

    ! 计算两个数的和
    sum = x + y

    ! 输出结果
    print *, "两数之和为：", sum
end program input_output_example

3. 编译Fortran程序

使用gfortran编译你的Fortran程序：

gfortran -o input_output_example input_output_example.f90

4. 运行Fortran程序

编译成功后，运行生成的可执行文件：

./input_output_example

程序会提示你输入两个数，然后输出它们的和。

5. 文件输入输出

除了标准输入输出，Fortran还支持文件输入输出操作。以下是一个简单的示例，演示如何读取和写入文件：

写入文件

program write_to_file
    implicit none
    integer :: i, unit_number
    real, dimension(5) :: numbers = [1.0, 2.0, 3.0, 4.0, 5.0]

    ! 打开文件
    unit_number = 10
    open(unit=unit_number, file='numbers.txt', status='replace', action='write')

    ! 写入数据到文件
    do i = 1, 5
        write(unit_number, *) numbers(i)
    end do

    ! 关闭文件
    close(unit_number)

    print *, "数据已写入文件 numbers.txt"
end program write_to_file

读取文件

program read_from_file
    implicit none
    integer :: i, unit_number
    real, dimension(5) :: numbers

    ! 打开文件
    unit_number = 10
    open(unit=unit_number, file='numbers.txt', status='old', action='read')

    ! 读取数据从文件
    do i = 1, 5
        read(unit_number, *) numbers(i)
    end do

    ! 关闭文件
    close(unit_number)

    ! 输出读取的数据
    print *, "从文件读取的数据："
    print *, numbers
end program read_from_file

6. 编译和运行文件I/O程序

编译并运行上述文件I/O示例程序：

gfortran -o write_to_file write_to_file.f90
./write_to_file

gfortran -o read_from_file read_from_file.f90
./read_from_file

通过这些步骤，你可以在CentOS上编写、编译和运行Fortran程序，并进行基本的输入输出操作。