- •«Информатика» программирование на фортране
- •Часть 1
- •От автора
- •Содержание
- •1. Константы
- •2. Типы констант
- •3. Переменные
- •4. Типы переменных
- •5. Операторы описания
- •6. Арифметические операции Операции по приоритету:
- •7. Расположение текста программы на экране дисплея
- •Правила набора текста программ:
- •Правило:
- •4 Write(6,*)’ Введите значения сторон треугольника a,b,c’
- •8. Технология прохождения фортран – программ на эвм
- •Технология прохождения фортран – программ на эвм
- •9. Арифметический оператор if
- •If(арифметическое выражение) m1, m2, m3
- •Примечание:
- •Правило:
- •Оператор, следующий после if арифметического должен иметь метку;
- •If арифметический не может быть последним оператором в цикле do.
- •4 Write(6,*)’ Введите значения сторон треугольника a,b,c’
- •8 Write(6,*)’ Площадь треугольника равна нулю’
- •9 Write(6,*)’ Такой треугольник не существует’
- •10. If логический
- •If(логическое выражение) выполняемый оператор
- •70% Ошибок у программистов возникает из-за несоответствия типов переменных!.
- •Условные обозначения логических операторов на блок-схемах
- •If арифметический if логический
- •11. Табулирование функции
- •12. Оператор цикла do
- •Внимание:
- •Примечание:
- •3 Write(6,*)’Введите переменные a,b,c’
- •13. Массивы
- •Примечание:
- •Вычисление определенного интеграла
- •1 Write(6,*)’Введите значения a,b,dx’
- •14. Работа с одномерными массивами Ввод массивов
- •Первый способ ввода массивов:
- •Второй способ ввода массивов:
- •Третий способ ввода массивов:
- •15. Вывод массивов Первый способ вывода массива
- •Второй способ вывода массива:
- •Третий способ вывода массива:
- •Четвёртый способ вывода массива:
- •Способ вывода массива в два столбца:
- •Фрагменты задач с одномерными массивами
- •If(b.Eq.K) write(6,*)’ Число m является чётным’
- •Сортировка массива
- •Второй способ сортировки массива:
- •16. Конструкция if then–else if then–else – end if
- •If (логическое выражение 1) then
- •Правила:
- •Примечания:
- •17. Оператор data
- •Правило:
- •По очерёдности следования
- •По типу данных.
- •Правило:
- •18.Работа с двухмерными массивами
- •19. Ввод двухмерного массива
- •Второй способ ввода массивов:
- •Третий способ ввода массивов:
- •Четвертый способ ввода массивов:
- •Фрагменты задач с двухмерными массивами
- •20. Вывод двухмерного массива
8. Технология прохождения фортран – программ на эвм
Как и на других языках высокого уровня, на фортране возможно выполнение загрузочного модуля, т.е. файла, имеющего расширение .EXE .
Загрузочный модуль получается путем трансляции и компиляции исходного текста программы.
Исходный текст программы (в предыдущем примере выделен жирным текстом, а курсивом выделены пояснения к программе) создается любым текстовым редактором и записывается на жесткий диск компьютера с именем (желательно не более 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 или создания искусственной сбойной ситуации путем ввода текстовой информации вместо числовой.
Технология прохождения фортран – программ на эвм
в Fortran PowerStation
PowerStation - оконная среда для разработки программ в операционной среде Windows (поддерживаются версии Windows 3.11, Windows 95, Windows 98, Windows ME). В комплект программного обеспечения входят:
Компилятор FL32.
Линкер LINK32.
Набор стандартных библиотек.
Многооконный редактор.
Отладчик фортран – программ.
Справочная информация.
Для запуска Fortran PowerStation необходимо запустить файл F32VWB.EXE расположенный в папке:
диск: \путь установки\BIN , если вы при установке указали путь d:\F32, то файл будет находится в папке:
d:\F32\BIN
Главное окно редактора имеет вид :
*- Разделительная линия находится в 6-ой позиции, поэтому символ «*» - перенос строки, ставится прямо на линии.
В главном меню редактора доступны следующие функции :
- В меню File возможно создание нового документа, открытие программы сохранненой на жестком диске, распечатка программы, выход из редактора.
- В меню Edit доступны функции по копированию, перемещению, вставке, удалению, поиску текстовой информации, отмена последнего действия.
- Меню View предоставляет сервисные функции для работы с программой (перемещение на заданную строку программы, включение / выключение строки состояния и.т.д).
-В меню Project возможно управление проектом(создание, редактирование), компиляция загруженной фортран-программы, создание и запуск на выполнение стандартного загрузочного модуля с расширением *.exe .
-Утилиты в меню Options дают возможность настроить параметры компилятора и линкера, присутствуют настройки редактора текста фортран програм.
Система Fortran PowerStation предназначена для работы в ОС Windows, но исполнимые модули полученные с ее помошью предназначены для работы в в OC DOS, поэтому для запуска прграмм в Windows потребуется специальный драйвер. Так же сохранена совместимость с прошлой версией компилятора, и все програмы написанные ранее, будут корректно выполнятся и в PowerStation.
Для примера можно рассмотреть процесс отладки, компиляции, запуска, и построения загрузочного модуля :
После набора исходного кода программы в редакторе нужно сохранить его выполнив следующую оперерацию : в главном меню выбираем пункт File -> Save, (или Save as…).
Далее следует поверить корректность исходного кода, т.е. нужно обработать исходный текст программы компилятором. Для этого выполняем следующи операции : в главном меню выбираем Project ->Compile File имя_файла.for . Откроестся окно в котором можно будет видеть сообщения компилятора, например если в программе есть ошибка вы увидите примерно следущее сообщение :
C:\F32\SAMPLES\FLOATING\ASSOC.FOR
C:\F32\SAMPLES\FLOATING\ASSOC.FOR(12) : error F2115: syntax error
FL32 returned error code 2.
ASSOC.FOR - 1 error(s), 0 warning(s)
Т.е. найдена ошибку в 12 строке вашей программы (C:\F32\SAMPLES\FLOATING\ASSOC.FOR(12) : error F2115: syntax error), F2115 – код ошибки, в справочной информации можно найти что обозначает данная ошибка. Для того чтобы быстро перейти на строку где обнаружена ошибка нужно просто два раза кликнуть курсором мыши на строке сообщения об ошибке, после этого откроется окно с текстом вашей программы и вы увидите строку где найдена ошибка подсвеченную другим цветом.
Если ошибок не обнаружено, вы увидите примерно такое сообщение компилятора :
Compiling...
Microsoft (R) FORTRAN PowerStation Optimizing Compiler Version 1.0
Copyright (c) Microsoft Corp 1984-1993. All rights reserved.
C:\F32\SAMPLES\FLOATING\ASSOC.FOR
ASSOC.FOR - 0 error(s), 0 warning(s)
После этого, можно выполнять операцию создания выполняемого загрузочного модуля. Для этого необходимо выполнить следующую последовательность операций : в главном меню выбираем Project -> Build имя_файла.for . После этого в открывшемся новом окне можно будет видеть рабочие сообщения компилятора и линкера.
Например :
Compiling...
Microsoft (R) FORTRAN PowerStation Optimizing Compiler Version 1.0
Copyright (c) Microsoft Corp 1984-1993. All rights reserved.
C:\F32\SAMPLES\FLOATING\ASSOC.FOR
Linking...
Microsoft (R) Portable Linker Version 2.8
Copyright (C) Microsoft Corp 1992-1993. All rights reserved.
-machine:i386 -base:0x00010000 -subsystem:console -entry:mainCRTStartup -debug:full -debugtype:cv4
ASSOC.OBJ
-out:ASSOC.EXE
libf.lib
libc.lib
kernel32.lib
ntdll.lib
Binding...
BINDMSF: MSOFT1 -- Copyright (C) 1986-93 Phar Lap Software, Inc.
Replacing .EXE stub in application: ASSOC.EXE with one
from file: C:\F32\BIN\BINDMSF.EXE.
INPUT FILES:
C:\F32\BIN\BINDMSF.EXE (stub .EXE at offset 47599) (25728 bytes)
ASSOC.EXE (89352 bytes)
OUTPUT FILE:
ASSOC.exe (115592 bytes)
ASSOC.EXE - 0 error(s), 0 warning(s)
Линкер выдает инфрмацию о параметрах с которыми поисходит построение модуля, библиотеках которые были использованы при создании модуля, имя и размер полученного исполняемого файла.