- •Часть 3
- •Содержание
- •30. Работа с файлами
- •Примечание:
- •31. Открытие файлов
- •File not found
- •32. Непосредственная работа с файлом
- •33. Форматный вывод информации
- •34. Форматное чтение информации из файла
- •35. Обработка сбойных ситуаций и ситуаций “конец файла” при вводе-выводе информации
- •Обработка сбойной ситуации:
- •7 Write (6,*) ’Введите a,I,b’
- •Обработка ситуации “конец файла”:
- •36. Операторы для работы с записями в файле
- •37. Дополнение файла информацией
- •Первый способ дополнения файла информацией:
- •10 Write (6,*)’Всего записей в файле’,kzap
- •Второй способ дополнения файла информацией
- •4 Write (6,*)’в файле было записей’,kz
- •38. Работа с текстом
- •39. Текстовые константы
- •Правило:
- •10 Format (a8)
- •10 Format (a)
- •1) Вводится меньше 8 символов, то они помещаются в переменную imfile, а недостающие до 8 позиции дополняются пробелами.
- •2) Вводится имя большего размера, чем 8 позиций, то будут восприняты только первые 8 символов и они будут записаны в переменную imfile;
- •8 Format (a10/5a5)
- •9 Format (1x,a10/1x,5a5)
- •9 Format (1x,a10/1x,5a5)
- •Семин а.В.
- •Правила ввода-вывода текстовой информации:
- •1). Ввод информации
- •Примечание:
- •40. Текстовые подцепочки
- •41. Вывод графиков
- •42. Эквивалентирование текстовых переменных
- •If(fam1.Eq.Fam2) write(6,9) fam2,k1,k2,k3,k4
- •7 Format (a40,i5,a15,i5,a7)
- •If (ngod.Ne.1962) goto 4
- •9 Format (1x,a40,i5,a15,i5,a7)
- •10 Write(4,*)’Конец просмотра базы данных’
- •43. Создание библиотек
- •44. Решение дифференциальных уравнений
- •45. Работа с комплексными данными
- •Правило:
- •46. Ввод-вывод переменных комплексного типа
- •Примечание:
- •47. Встроенные функции комплексного типа
- •48. Оператор equivalence
- •Правило:
- •49. Результаты арифметических операций в выражениях с данными разного типа
- •50. Файлы прямого доступа
- •51. Способы передачи форматных записей
- •52. Модификации оператора цикла do
- •6 Continue
- •If (y.Lt.0.05) cycle
- •55. Командные файлы
- •If errorlevel 1 go to exit
- •If errorlevel 1 go to done
55. Командные файлы
Командные файлы используются для автоматизации обработки информации ЭВМ.
имя.bat
Командные файлы содержат последовательность команд системы DOS, в которых задаются определённые управляющие команды в системе математического обеспечения ЭВМ. Например, можно использовать командный файл для процесса трансляции и компоновки программ, созданных на ФОРТРАНе, содержащий следующую информацию:
ECHO OFF
ECHO*Компилятор языка ФОРТРАН
FL /C /4Yb /Ox /AH /FPc /Fs%1 /Tf%1.for /Fo% 1.OBJ
If errorlevel 1 go to exit
При обнаружении ошибок во время трансляции происходит
переход на метку EXIT. Метки в bat файлах начинаются с символа “ : ”.
LINK %1 %2 %3 %4 %5 %6 %7, , ,LLIBFORE /E;
If errorlevel 1 go to done
GO TO NORM
: EXIT
ECHO* При трансляции обнаружены ошибки. Исправьте файл .FOR
GO TO END
:DONE
ECHO* При компиляции обнаружены ошибки
ECHO* Проанализируйте файл .LST и исправьте ошибки в файле .FOR
GO TO END
:NORM
DEL %1.obj
DEL %1.map
DEL %1.lst
:NORM
ECHO* Компоновка завершена успешно.
Запустите на выполнение файл .EXE
:END
Командные файлы используют специальные операторы и команды.
Операторы: ECHO, GO TO, IF.
Команды: FL,LINK,DEL.
ECHOOFF– очищает экран компьютера.
FL– команда на трансляцию программы.
FS%1 – запоминаетимяобрабатываемого файла и далее %1 соответствует имени этого файла.
TF%.for– транслятор языка Фортран.
Fo%1.obj– создаёт объектный файл в виде: имя.obj.
В результате трансляции программы создаётся 3 файла:
имя.obj, имя.map, имя.lst.
После команды FLс помощью оператораIFанализируется уровень ошибкиERRORLEVEL– может содержать 0 или 1. Обычно результат ноль. Но, если в результате обработки текста программы транслятор обнаружил ошибки, тоERRORLEVELустанавливается в 1.
LINK– компоновщик или компилятор – осуществляет оформление программы в единый модуль и к файлу типа .objподключается модули стандартных программ языка ФОРТРАН и модули из библиотеки математического обеспечения.LINKсобирает все файлы и формирует файл %.exe. Файл .exeявляется загрузочным модулем и может быть запущен на выполнение.
Этот модуль может работать и на компьютерах, на которых не установлена система программирования Фортрана.