使用Fortran 90在输入文件中正确读取注释行

在处理文件时，读取包含注释的行是一个常见的任务。Fortran 90 是一种流行的编程语言，广泛用于科学计算和数据处理。在这个例子中，我们将使用 Fortran 90 来读取包含注释的行。

首先，我们需要编写一个 Fortran 90 程序来读取输入文件中的注释行。以下是一个简单的示例程序：

program read_comments

    implicit none

    ! 定义变量
    character(len=100) :: input_file, comment_line
    
    ! 读取输入文件名
    open(unit=10, file=input_file, status='old', action='read')
    
    ! 读取第一行
    read(10, *, end=99) comment_line
    
    ! 关闭文件
    close(10)
    
    ! 打印注释行
    print *, comment_line

99     continue

end program read_comments

在这个程序中，我们使用 implicit none 语句来关闭所有默认的输入输出。然后，我们定义了两个变量：input_file 和 comment_line。input_file 是我们要读取的文件名，而 comment_line 是我们要打印的注释行。

我们使用 open 语句打开文件，并使用 read 语句从文件中读取第一行。然后，我们使用 close 语句关闭文件。最后，我们使用 print 语句打印注释行。

为了使用这个程序，你需要将 input_file 替换为你想要读取的文件名。然后，你可以运行这个程序，程序将打印出指定文件名中的注释行。