Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
W-10_Fort_68_стр_10г..doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
1.18 Mб
Скачать

4.4 Задания к лабораторной работе № 4

Вариант № 1

Составить программу выборки минимального элемента из массива А (М, N). Использовать форматный вывод. ( М, N ≤ 20.)

Вариант № 2

Составить программу выборки максимального элемента из массива А (М, N).

Использовать форматный вывод. ( М, N ≤ 20.)

Вариант № 3

Составить программу вычисления суммы отрицательных элементов из массива А (М, N). Использовать форматный вывод. ( М, N ≤ 20.)

Вариант № 4

Составить программу вычисления суммы положительных элементов из массива А(М,N). Использовать форматный вывод. (М, N ≤ 20.)

Вариант № 5

Составить программу вычисления количества положительных элементов в массиве А (М, N). Результат распечатать. (М, N ≤ 20.)

Вариант № 6

Составить программу вычисления количества отрицательных элементов в массиве А (М, N). Использовать форматный вывод. ( М, N ≤ 20.)

4.5 Пример выполнения задания лабораторной работы № 4

Тема: Работа с двумерными массивами.

Цель работы: Составление программы для обработки элементов двумерных массивов.

Теория: Краткие сведения из теории ………

Пример варианта задания:

Составить блок-схему (рис 9.) и программу выборки минимального элемента из массива А (М, N), используя форматный вывод. (М, N ≤ 20)

PROGRAM MIN_EL

DIMENSION A (20, 20)

* IrinaI418z

AMIN = A (1, 1)

PRINT*,'ввести N, M '

READ(5,*) N, M

PRINT *,'ввести элементы массива'

READ (5,*) ((A( I,J ), I = 1, N), J=1,M)

AMIN = A (1,1)

DO 2 I = 1, N

DO 2 J = 1, M

IF (А( I, J).GE. AMIN) GOTO 2

AMIN = A ( I, J ) да

2 CONTINUE

PRINT*, 3, AMIN нет

AMIN = A (I,J)

3 FORMAT ('3X, ‘AMIN ', F 12.5)

END

В ведите N, M

3 3

В ведите элементы массива

-2 5 3 1 0 25 7 11 9

Ответ: AMIN -2 Рис. 9

Раздел V. Лабораторная работа № 5

5.1. Программные единицы

Все рассмотренные до сих пор программы состояли из одной программной единицы, начинавшейся с оператора PROGRAM. Однако программа на Фортране может состоять из нескольких программных единиц. Такая составная программа всегда содержит главную программную единицу, или главную программу, и одну или несколько подпрограмм.

Главная программа, как следует из названия, является ведущей программной единицей, и обработка всей программы начинается с первого исполняемого оператора главной программы. При записи на диске или на бумаге главную программу обычно располагают в начале всей программы, за главной программой следуют подпрограммы. Порядок следования подпрограмм значения не имеет.

Нередко последовательность команд, выполняющих конкретное вычисление, необходимо повторить в нескольких различных точках программной единицы. Записывать эту последовательность команд несколько раз слишком трудоемко. Существует специальный механизм, позволяющий записать последовательность команд только один раз и выполнить ее в тех точках программы, где это необходимо. Для этого нужная последовательность команд соответствующим образом оформляется, в виде отдельной програм­мной единицы, называемой подпрограммой. Идея подпрограммы оказалась очень плодотворной, стало возможным создание больших библиотек подпрограмм, написанных специалистами, компоновка сложных программ из библиотечных подпрограмм и подпрограмм, написанных программистом. Программист избавлен, таким образом, от необ­ходимости тратить массу времени на написание своих собственных программ, выполняющих стандартные, математические вычисления. Эта идея использована и при построении стандартных функций Фортрана. Например, в операторе Х = - В + SQRT(В*В - 4.0*А*С) находится значение аргумента функции SQRT (т.е. делаются вычисления в скобках). Затем переход ко встроенной функции (т.е. подпрограмме) SQRT, которая выполняет последовательность команд по вычислению квадратного корня. Найденное значение корня возвращается в арифметическое выражение и вычисление значения этого выражения продолжается.

Имеются два основных типа подпрограмм: FUNCTION (подпрограммы – функции) и SUBROUTINE подпрограммы. FUNCTION во многом подобна стандартным функциям языка Фортран, вычисляет единственное значение и возвращает управление в вызывающую программную единицу вместе с вычисленным значением.

SUBROUTINE - подпрограммы позволяют решать более сложные задачи, например, такие как сортировка чисел в массиве, вычислять координаты центра тяжести тел сложной формы, выполнять сложные операции вывода и т.п.

Программная единица, из которой осуществляется вызов подпрограммы, называется вызывающей программной единицей или программным модулем. Часто это главная программа, но вызывающей программной единицей может быть и подпрограмма. В Фортране запрещен вызов подпрограммы из самой себя непосредственно или через другую программную единицу.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]