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程序，并進行基本的輸入輸出操作。