Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
современный фортран , Бортеньев.pdf
Скачиваний:
272
Добавлен:
26.03.2015
Размер:
2.34 Mб
Скачать

О. В. Бартеньев. Современный ФОРТРАН

в операторе может быть до 7200 символов. Число строк продолжения в свободной форме не может быть более 54;

любые расположенные между восклицательным знаком и концом строки символы рассматриваются как комментарий, например:

real x, y,

&

! Комментарий в начальной строке

z, a(5),

&

! Строка продолжения

r, b(10)

 

! Еще одна строка продолжения

x = 1.1; y = 2.2; a = -5.5

 

! Операторы присваивания

Замечание. Помимо свободной программу можно записать и в фиксированной, унаследованной от Фортрана 77 форме (прил. 2). Файлы, содержащие текст в фиксированной форме, по умолчанию имеют расширения F или FOR. В файлах с такими расширениями можно перейти и к свободной форме, задав директиву $FREEFORM или опцию компилятора

/4Yf [1].

Запустим теперь программу p1, используя приведенные в разд. 1.2 сведения.

1.2. Консоль-проект

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

1.2.1. Создание проекта в CVF

Начнем создание проекта с запуска DS. Для этого после запуска Windows 95 или Windows NT можно выполнить цепочку действий: пуск -

программы - Compaq Visual Fortran - Developer Studio. Перейдем к созданию нового консоль-проекта CVF. Для этого выполним цепочку File - New - выбрать закладку Projects - Fortarn Console Application - задать имя проекта, например proj1, - задать папку размещения проекта, например D:\FORTRAN\proj1, - OK. В появившемся затем окне выбрать кнопку Anempty project и нажать Finish. Тогда будет создана директория (папка), имя которой совпадает с именем проекта. В этой папке будут размещены файлы проекта с расширениями DSP, DSW и NCB. Также будет создана папка Debug. Сам же проект отобразится на закладке FileView (рис. 1.1).

6

1. Элементы языка

Рис. 1.1. Проект proj1

Создадим теперь файл, в который будет занесен текст программы,

выполнив: File - New - выбрать закладку Files - выбрать Fortran Free Format Source File - активизировать опцию Add to project - задать имя файла, например myp (расширение опустить), - OK. Созданный файл получит расширение F90 и разместится в D:\FORTRAN\proj1.

Если же файл уже существует, то для его добавления в проект в окне FileView выберите папку Source Files и выполните: нажать на правую кнопку мыши - Add Files to Folder - выбрать тип файлов и необходимые файлы (рис. 1.2) - OK.

Рис. 1.2. Добавление файлов в проект

7

О. В. Бартеньев. Современный ФОРТРАН

Чтобы отобразить на экране содержимое файла, достаточно ударить по нему дважды мышью.

1.2.2. Создание проекта в FPS

FPS может быть оснащен более ранней версией DS, в которой схема создания проекта и добавления в него файла несколько иная.

После запуска DS выполним цепочку File - New - Project Workspace – OK - Console Application - ввести имя проекта - задать расположение проекта на диске - Create. После нажатия кнопки Create будет создана директория (папка), имя которой совпадает с именем проекта. В этой папке будут размещены файлы проекта с расширениями MAK и MDP.

Создадим теперь новый файл, выполнив File - New - Text File - OK. Наберем далее в правом окне текст программы и запишем его на диск: File - Save - выбрать на диске директорию для записи файла - задать имя файла с расширением, например myp.f90, - сохранить.

Добавим созданный файл в проект: Insert - File Into Project - выбрать файл myp.f90 - Add.

1.2.3. Операции с проектом

Чтобы закрыть проект, следует выполнить: File - Close Workspace. Существующий проект открывается в результате выполнения цепочки File - Open Workspace - выбрать файл проекта - Open. Для удаления файла из открытого проекта достаточно выбрать этот файл в окне FileView инажать Del.

Выполним теперь компиляцию проекта: Build - Compile - и исправим обнаруженные ошибки, сообщения о которых вы найдете в нижнем окне на закладке Build.

Создадим выполняемый EXE-файл: Build - Build. Запустим его для исполнения: Build - Execute - и получим результат. Для выхода из рабочего DOS-окна, в котором отобразились результаты, нажмем любую клавишу, например Esc или Enter.

Компиляцию, сборку и запуск программы можно также выполнить, используя имеющиеся в среде кнопки (Compile, Build, GO) или выбирая на клавиатуре соответствующие сочетания клавиш, информация о которых размещается в пунктах меню DS. Здесь же отметим, что все три упомянутых выше этапа (компиляция, сборка и запуск) будут выполнены после нажатия Ctrl+F5. Впрочем, если в проекте несколько файлов, удобнее (с позиции выявления ошибок) компилировать файлы по отдельности, переходя к обработке следующего файла после устранения всех синтаксических ошибок в текущем.

8