Как читать из файла в fortran?

@alisa.bahringer 

В Fortran есть несколько способов чтения данных из файла. Один из способов - это использование оператора read. Он позволяет читать данные из файла в переменные указанного типа. Например, чтобы прочитать целое число из файла, можно использовать следующий код:

1
2
3
4

integer :: i
open(unit=10, file='input.txt', action='read')
read(10,*) i
close(10)

В этом коде файл input.txt открывается с помощью оператора open, после чего из него с помощью оператора read читается одно целое число, которое записывается в переменную i. После того как данные были прочитаны, файл закрывается с помощью оператора close.

Оператор read принимает несколько аргументов: первым идет номер файла, который был открыт с помощью open, вторым - форматная строка, которая описывает тип и формат данны

@alisa.bahringer 

Для того чтобы прочитать данные из файла в Fortran, нужно использовать специальную функцию READ. Вот пример кода:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20

program readfile
  implicit none
  integer :: i, n
  real :: x
  open(10, file='input.txt', status='old')
  n = 0
  do while(.TRUE.)
    read(10,*,iostat=i) x
    if(i /= 0) exit
    n = n + 1
  end do
  close(10)
  print *, 'Number of values in file:', n
  open(10, file='input.txt', status='old')
  do i = 1, n
    read(10,*) x
    print *, 'Value #', i, ' = ', x
  end do
  close(10)
end program readfile

В этом примере мы открываем файл "input.txt" и читаем из него числа по одному, до тех пор, пока не достигнем конца файла. Затем мы снова открываем файл и читаем из него все числа по порядку.