Ubuntu下Fortran如何进行数据输入输出

在Ubuntu下使用Fortran进行数据输入输出，你可以使用内置的I/O语句和函数。以下是一些基本的示例：

数据输入

1. 读取标准输入（通常是键盘）

program read_input
    implicit none
    integer :: num
    real :: pi_value

    print *, 'Enter an integer:'
    read *, num

    print *, 'Enter a floating-point number:'
    read *, pi_value

    print *, 'You entered:', num, 'and', pi_value
end program read_input

2. 从文件读取

program read_from_file
    implicit none
    integer :: iounit, ios
    real, allocatable :: data(:)

    ! 打开文件
    open(unit=iounit, file='data.txt', status='old', action='read', iostat=ios)
    if (ios /= 0) then
        print *, 'Error opening file!'
        stop
    end if

    ! 读取数据
    read(iounit, *) data

    ! 关闭文件
    close(iounit)

    print *, 'Data read from file:', data
end program read_from_file

数据输出

1. 写入标准输出（通常是屏幕）

program write_output
    implicit none
    integer :: num = 10
    real :: pi_value = 3.14159

    print *, 'The integer is:', num
    print *, 'The value of pi is:', pi_value
end program write_output

2. 写入文件

program write_to_file
    implicit none
    integer, parameter :: iounit = 10
    real, dimension(5) :: data = [1.0, 2.0, 3.0, 4.0, 5.0]

    ! 打开文件
    open(unit=iounit, file='output.txt', status='replace', action='write')

    ! 写入数据
    write(iounit, *) 'Data to be written to the file:', data

    ! 关闭文件
    close(iounit)

    print *, 'Data written to file successfully!'
end program write_to_file

注意事项

• 确保文件路径正确，特别是在读取和写入文件时。
• 使用iostat参数来检查I/O操作是否成功。
• 在处理文件时，注意文件的打开模式（如old、new、replace等）。
• 在写入文件时，可以使用格式化I/O来控制数据的显示格式。

通过这些基本的示例，你应该能够在Ubuntu下使用Fortran进行简单的数据输入输出操作。如果你有更复杂的需求，可以进一步学习Fortran的I/O语句和函数。