Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
ЛР-08. Подпрограммы (FORTRAN).doc
Скачиваний:
1
Добавлен:
01.07.2025
Размер:
328.19 Кб
Скачать

Лабораторная работа № 8

ПОДПРОГРАММЫ

Цель работы – уяснение общего и основных различий между подпрограммой и функцией; составление программ с использованием подпрограмм; решение задач, связанных с операциями над массивами.

Постановка задачи:

  1. Выполнить задание с использованием подпрограммы.

  2. Исходные данные ввести из текстового файла, который представить вместе с листингом программы и результатами счета. Ввод данных оформить как подпрограмму.

  3. Решение задачи оформить в виде подпрограммы.

  4. Исходную матрицу и результаты вывести в другой текстовый файл. Вывод данных в файл оформить в виде подпрограммы.

  5. Весь обмен данными между основной программой и процедурами организовать через список формальных/фактических параметров.

Типовой вариант

Найти максимальный и минимальный элементы и разность между ними для массива

Порядок выполнения работы

  1. Создайте новый проект консольного приложения с именем Lab8_V1. Откройте исходный файл Lab8_V1.f90 в окне редактора

  1. Вставьте в проект текстовый файл для ввода исходных данных (команда меню «Project / Add to Project / New…»).

  1. Выберите на вкладке «Files» диалоговой панели «New» тип вставляемого объекта «Text File», введите имя файла Lab8_V1 в окне «File name» и подтвердите установки нажатием на кнопку OK.

  1. В результате новый текстовый файл Lab8_V1.txt (расширение имени файла .txt будет добавлено автоматически) будет вставлен в проект и открыт в окне редактора. Внесите данные задания (через пробел)

  1. Отредактируйте текст программы в соответствии с заданием, снабдив операторы программы комментариями. Основные действия в процессе вычислений (ввод данных, расчет результатов, вывод в файл, вывод на экран) оформите в виде подпрограмм.

  • Организуйте ввод исходных данных из текстового файла Lab8_V1.txt. Сначала считайте количество строк/столбцов квадратной матрицы, затем элементы матрицы построчно.

  • Запрограммируйте алгоритм поиска разности между максимальным и минимальным элементами массива.

  • Организуйте вывод данных в текстовый файл Lab8_V1.out.

  • Для контроля продублируйте вывод на экран.

  • В главной программе объявите имена переменных для данных задания.

  • Затем вызовите подпрограммы основных действий вычислительного процесса.

  1. Запустите на выполнение консольное приложение. Проанализируйте контрольный вывод исходного массива второго задания и результаты расчета на экране.

  1. Программа автоматически осуществила вывод данных в новый файл Lab8_V1.out на диске в папке проекта. Добавьте результирующий текстовый файл Lab8_V1.out в прект (команда меню «Project / Add to Project / Files…»).

  1. Чтобы увидеть и подключить к проекту текстовый файл Lab8_V1.out в открывшемся диалоговом окне «Insert Files Into Project» установите фильтр типа показываемых файлов на «Все файлы».

  1. В результате этих действий в окне появятся все файлы, которые содержатся в папке проекта. Выделите файл Lab8_V1.out и нажмите кнопку OK.

  1. Имя добавленного в проект файла появится в иерархическом дереве файлов на вкладке FileView рабочего пространства Workspace. Чтобы увидеть содержимое файла Lab8_V1.out, выполните двойной щелчок левой кнопки мыши по имени файла. Проанализируйте результаты вывода в текстовый файл Lab8_V1.out и сравните с результатами вывода на экран. Они должны быть идентичными.

  1. Завершите работу консольного приложения и интегрированной среды Microsoft Developer Studio.

  2. Оформите отчет о проделанной лабораторной работе в соответствии с вариантом (см. далее пример оформления работы).

Варианты заданий взять из лабораторной работы № 6 (для задачи 2).

ПРИМЕР ОФОРМЛЕНИЯ ОТЧЕТА