Основы программирования на языке фортран. Учебно-методическое пособие

REAL x

OPEN (2, File= ’DATA’, ACTION=’Write’)

DO I=1, 10

PRINT *, ‘ введите ‘ , I , ‘-е число’

READ (*,*) x

WRITE (2,*) x

END DO

CLOSE (2)

END

Пояснения к примеру: оператором OPEN открывается файл DATA для записи и определяется канал с номером 2 для передачи данных. Далее в цикле по I последовательно вводятся числа и присваиваются переменной х. Каждое число сразу после ввода передается в файл DATA по каналу с номером 2. Оператор

CLOSE закрывает файл.

Пример. Составим теперь программу, которая формирует массив В из данных, содержащихся в файле DATA.

DIMENSION В(10)

OPEN (4, File= ’DATA’, ACTION=’Read’)

DO I=1, 10

READ (4,*) B(I)

PRINT *, B(I)

END DO

CLOSE (4)

81

END

Пояснения к примеру: в 1-й строке описывается массив B,

состоящий из 10 элементов. Оператор OPEN открывает файл

DATA для чтения и определяет канал с номером 4 для передачи данных. Далее в цикле для каждого значения I последовательно считываются числа и присваиваются соответствующим элементам массива B(I). Каждое число сразу после считывания выводится в столбец на экран. Оператор CLOSE закрывает файл.

12. РАБОТА В СРЕДЕ ПРОГРАММИРОВАНИЯ

Существуют несколько вариантов бесплатных компиляторов Фортран. Авторы рекомендуют использовать Фортран фирмы

«SilverFrost», обладающую следующими преимуществами:

˗имеется полностью бесплатный вариант без каких-либо ограничений, в том числе, и по сроку использования;

˗бесплатно поставляется не только компилятор, но и встроенный редактор связей (сборщик), текстовый редактор и отладчик (IDE Plato Studio);

˗проверена работоспособность на Windows 7, 8 и 10

любой разрядности.

Недостатки тоже имеются, но с ними можно примириться:

˗отсутствие описания на русском языке.

˗полное неприятие русских букв в тексте программы и названиях папок.

82

˗ вынужденная пятисекундная пауза перед исполнением программы.

Скачать Фортран FTN95 фирмы SiverFrost можно на сайте фирмы SilverFrost.com.

13. ИНСТРУКЦИЯ ПО РАБОТЕ В PLATO IDE STUDIO

Среда разработки программ Plato IDE Studio снабжена текстовым редактором, компиляторами, сборщиком, отладчиком

Работа начинается с создания проекта:

−создайте папку для хранения проектов, например, d:/PROJ;

−в папке проектов d:/PROJ создайте папку myProj под новый проект;

−в одной папке может быть лишь один проект.

Создайте новый проект в каталоге с именем myProj, для

этого, в среде Plato выполните пункты меню:

File|New Project|Fortran Application:

−задайте снизу имя проекта в поле Name;

−через <Browse> выберите место Location для размещения проекта myProj в папке d:/PROJ и нажмите кнопку <Open>,

чтобы создать проект.

Варианты включения программы в состав проекта:

-создать новый текст программы Lab.f90 в Plato IDE Studio и

включить в проект по правой кнопке мыши;

-включить в проект ранее написанную программу labac.f90

83

через меню Source Files | Add existing item ==> выбрать labac.f90.

Создание нового текста программы Lab.f90 по правой кнопкой мыши в Project Explorer пункт Source Files | New Item:

−задайте снизу имя программы в поле Name;

−через <Browse> выберите место Location для размещения программы lab.f90 в папке d:/PROJ/myProj и нажмите кнопку

Open, чтобы создать программу;

−набрать новый текст программы;

−щелкнуть по правой кнопке мыши – и по кнопке Compile

выполнить компиляцию.

Удобно помимо программы включать в проект следующие

тексты:

−исходные данные через меню Source Files|Add existing item ==> выбрать myProject/in.txt, тогда при выполнении программы данные будут читаться из файла в текущем каталоге проекта с именем, указанным в операторе open;

−текст результатов – под именем, указанным в операторе open.

Все тексты, кроме программы, именуйте, используя

расширение txt, чтобы они были доступны в любом текстовом редакторе. Тексты программы и результатов составят распечатку для отчета.

Вызов – ярлычок Plato IDE. Чтобы закончить работу с программой и сохранить всю информацию, достаточно закрыть приложение, щелкнув по крестику в верхнем правом углу окна приложения. При повторном входе надо загрузить последний

84

проект.

Варианты создания приложения – переключатель

Debug|Release:

−Debug – отладочный вариант приложения, выполнение <F7>;

−Release – чистовой вариант приложения, выполнение

<Ctrl>+<F5>.

Варианты запуска программы на выполнение:

- Step Info, отладка в пошаговом режиме, после коррекции программы

щелкните по клавише <F7>, чтобы скомпилировать,

скомпоновать и выполнить программу в отладочном режиме, в отдельном окне;

- Start run, или, что то же самое <Ctrl>+<F5>, чтобы запустить программу без отладки, в чистовом варианте;

Дополнительные возможности по отладке программы:

-<F6> – Continue, продолжить программу;

-<F7> – Step Info, пошаговая отладка;

-<F8> – Step Over, пошагово, не «ныряя» в процедуры;

-<Ctrl>+<F10> – Goto Cursor, идти в отладке до места,

указанного курсором;

- чередуя <F7> , <F8>, <Ctrl>+<F10> при «хитрой» отладке.

85

ЛИТЕРАТУРА

1.Бартеньев О.В. «Современный FORTRAN», Москва,

1998 г.

2.Бартеньев О.В. «FARTRAN для студентов», Москва,

1990 г.

3.Немнюгин М.А., Стесик О.Л. «Современный Фортран»,

Санкт-Петербург, 2004 г.

4.Немнюгин М.А., Стесик О.Л. «Фортран в задачах и примерах», Санкт-Петербург, 2004 г.

5.Артемов И.Л. «FORTRAN основы программирования»,

Москва, 2007 г.

6. Рыжиков Ю.И. «Современный Фортран», Санкт-

Петербург, 2004 г.

86

Учебно-методическое издание

Мухин Леонид Викторович Ермакова Наталья Анатольевна Ваньшин Александр Евгеньевич

ОСНОВЫ ПРОГРАММИРОВАНИЯ НА ЯЗЫКЕ ФОРТРАН

Учебно-методическое пособие для выполнения лабораторных работ

и практических занятий

Тираж 100 экз. Изд.№ 49-18

Москва, Издательский центр Onebook

87