8. Технология прохождения фортран – программ на эвм

Как и на других языках высокого уровня, на фортране возможно выполнение загрузочного модуля, т.е. файла, имеющего расширение .EXE.

Загрузочный модуль получается путем трансляции и компиляции исходного текста программы. Ниже приведены особенности для FORTRAN 77.

Исходный текст программы (в предыдущем примере выделен жирным текстом, курсивом выделены пояснения к программе) создается любым текстовым редактором и записывается на жесткий диск компьютера с именем (желательно не более 8 символов) и расширением .FOR. Например, PROG1.FOR. Затем этот файл обрабатывается транслятором и компилятором. Этот процесс лучше выполнять с использованием командных файлов (см. главу Командные файлы). При трансляции создаются файлы:

PROG1.LST с листингом (распечаткой исходного текста программы с указанием найденных транслятором ошибок);

PROG1.OBJ – файл объектного модуля в кодах;

PROG1.MAP – карта распределения памяти.

Эти файлы могут использоваться как временные и при отсутствии ошибок после компиляции программы и получения загрузочного модуля PROG1.EXE могут быть удалены.

При наличии ошибок, обнаруженных транслятором (следует иметь в виду, что транслятор не в состоянии обнаружить все ошибки программы), необходимо просмотреть на экране файл PROG1.LST и выяснить ошибки, которые вы допустили. Следует удержать себя от соблазна исправить эти ошибки прямо в файле PROG1.LST. Ошибки необходимо исправлять в файле исходного текста PROG1.FOR, а затем снова транслировать… и.т.д. до получения загрузочного модуля PROG1.EXE.

Для запуска программы необходимо выделить файл PROG1.EXE и нажать клавишу ENTER.

Программа начнет выполняться и на экране появляется результат работы оператора WRITE –

Введите значения сторон треугольника А,В,С

Затем ЭВМ ожидает ввода данных для списка ввода оператора READ. Мы должны ввести три числа. Эти данные следует набрать на клавиатуре и они должны отобразиться на дисплее. Одно число от другого отделяется запятой или символом “пробел”. При вводе большего количества чисел, чем три, лишние игнорируются. Ввод заканчивается нажатием клавиши “ENTER”. При вводе количества чисел меньше, чем три и нажатии “ENTER”, ЭВМ будет ожидать ввода остальных чисел из списка ввода. Необходимо набрать оставшиеся числа, и нажать “ENTER”. Затем программа продолжает свою работу. Вычисляет значение переменных P и S. Затем оператор вывода информации WRITE выведет на экран результат. Оператор GOTO 4 осуществляет переход ко вводу новых исходных данных.

Выполняемая программа снимается с выполнения или по достижению оператора STOP или комбинации клавиш CTRL+Break или создания искусственной сбойной ситуации путем ввода текстовой информации вместо числовой.

9. Арифметический оператор if

Служит для разветвления программ в 3-х или 2-х направлениях в зависимости от заданных условий. Записывается в виде:

IF (<арифметическое выражение>) m₁, m₂, m₃

где m₁, m₂, m₃ – метки операторов, на которые будет передаваться управление вычислительным процессом.

Пример: IF (2.*A–SIN(B)) 3, 4, 12

IF арифметический работает следующим образом:

1) Вычисляется арифметическое выражение в скобках.

2) Вычисленное значение сравнивается с нулём.

3) Если вычисленное значение <0, то управление передаётся на метку m₁(3), если вычисленное значение =0, то управление передаётся на метку m₂ (4), если >0, то на метку m₃ (12).

С помощью IF арифметического, к примеру, можно проверять подкорневое выражение и если оно окажется отрицательным (нельзя извлечь корень квадратный из отрицательного числа по законам математики), то управление передастся на нужную метку и не произойдёт прерывание выполнения программы при попытке вычисления корня из отрицательного числа.

Примечание:В IF арифметическом должно быть всегда три метки, две из них могут быть одинаковыми. Метки могут быть расположены в любом месте программы (выше или ниже оператора IF).

Правило: