LINUX.ORG.RU

История изменений

Исправление grem, (текущая версия) :

или так

program main
  implicit none
  character(:), allocatable :: c
  integer :: a(6)
  c ="[23,87,43,987,1,543]"
  c = c(2:len(c)-1)
  read(c,*) a
  print *, a
end

для fortran95 должно работать.

Исходная версия grem, :

или так

program main
  implicit none
  character(:), allocatable :: c
  integer :: a(6)
  c ="[23,87,43,987,1,543]"
  c = c(2:len(c)-1)
  read(c,*) a
  print *, a
end