Нет, в отличие от других ответов CSV - не самый простой для чтения файл.Перейдите в Файл / Сохранить как / Другие форматы и сохраните его как Отформатированный текст (разделенный пробелом) .В зависимости от вашей локали у вас будет запятая или точка с запятой в качестве десятичной точки, поэтому вам придется (либо использовать внешний редактор для простого поиска / замены), либо написать фортрановую подпрограмму, которая будет проходить символ за символоми заменяет каждую запятую точкой с полной остановкой.
После этого это просто, не нужно анализировать ;
, поэтому вы просто
program FreeFormat
real(4), dimension(5) :: open, high, low, close, dayaverage
real(4) :: average
open(unit=1, file='filename.prn', status='old')
do i=1,5
read(1,*)open(i), high(i), low(i), close(i), dayaverage(i)
enddo
average = sum(dayaverage)/5
write(*,'("Average is",f5.2)')average
end program FreeFormat
Вы получаете точку ...
Вот несколько ссылок для начала работы (связанные с Excel / Fortran DLL) ...
Проблема с расположением файла при подключении к Excel / Fortran DLL
Фортран DLL & MS Excel