Программирование на языке фортран лабораторные

Л А Б О Р А Т О Р Н А Я Р А Б О Т А № 5

ОБРАБОТКА МАССИВОВ

С п р а в о ч н а я и н ф о р м а ц и я

Наряду с понятием переменной в программировании, аналогично математике, где используются понятия вектора и матрицы для описания многомерных объектов, существует понятие массива. Под ним понимается совокупность переменных одного типа, имеющих общее имя. Правила образования имен массивов и их типы полностью совпадают с правилами для переменных. При работе с массивом к каждой отдельной переменной можно обратиться, указав ее позицию в массиве. При этом каждая переменная будет именоваться именем массива, за которым в круглых скобках следуют разделенные запятыми числа, указывающие на ее позицию. Эти числа называются индексами, а сама переменная — переменной с индексами. Например, под именем массива А может подразумеваться последовательность переменных — элементов:

A(1) A(2) A(3) A(4) ….. A(45)

или

A(1, 1) A(1, 2) … A(1, 9)

A(2, 1) A(2, 2) … A(2, 9)

………………………………….

A(7, 1) A(7, 2) … A(7, 9)

и так далее

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

B(i), A(k, i+1), C(2, N(i)), Sx(i, j, k) .

Индексы, описанные выражениями, операнды которых имеют разные типы, вычисляются в соответствии с общими правилами и, если их результат окажется вещественным, он приводится к целому типу:

запись A(2.7) идентична A(2);

запись A(k+1.3) при k = 3 идентична A(4);

запись A(B+2) при B = 3.62 идентична A(5).

В отличие от простой переменной, которая предназначена для хранения одной величины, массив позволяет хранить множество величин. Поэтому в программе обязательно должно быть оговорено их количество. Эту функцию выполняет оператор Dimension, который, как оператор описания, должен располагаться в начале программы – перед выполняемыми операторами. Он имеет вид

Dimension список ,

где список содержит имена массивов вместе с границами их индексов, за ключенными в скобках и разделенными запятыми. Имена массивов также разделяются запятыми.

Если значение границы индекса указано в форме целой положительной константы, то оно определяет наибольшее значение данного индекса. При этом наименьшее значение по умолчанию принимается равным единице. Допускается устанавливать значение нижней границы индекса отличное от единицы. В этом случае указываются обе границы индекса, разделенные символом ":". Например, оператор

Dimension A(3), B(-1:1)

описывает два вещественных массива с именами A и B, каждый из которых состоит из трех элементов. Разница между ними состоит в том, что элементы первого массива имеют имена A(1), A(2), A(3), а второго — B(-1), B(0) и B(1).

Оператор Dimension подразумевает, что тип массива определяется по первой букве его имени. Если требуется явное определение типа массива, то вместо оператора Dimension должны использоваться операторы описания типов Integer или Real. Например, операторы

Integer A(4)

Real Num(-2:2), L(0:2, 3)

описывают целый одномерный массив A из четырех элементов, одномерный вещественный массив Num из пяти элементов и двумерный вещественный массив L из девяти элементов.

Элементы массивов хранятся в памяти ЭВМ с последовательно возрастающими адресами. Так массив A(4) располагается в памяти следующим образом:

A(1) A(2) A(3) A(4) .

Многомерные массивы располагаются в памяти таким образом, что значения первого индекса возрастают быстрее значений второго, значения второго — быстрее значения третьего и так далее. Например, элементы двумерного вещественного массива L располагаются в следующем порядке

L(0,1) L(1,1) L(2,1) L(0,2) L(1,2) L(2,2) L(0,3) L(1,3) L(2,3)

Если массив L представить в виде матрицы

то такой порядок следования элементов в памяти ЭВМ соответствует размещению их по столбцам.

Ввод-вывод массивов осуществляется с помощью операторов Read и Write по тем же правилам, что и для простых переменных. Например, оператор

Read(*, *) A

считывает информацию в каждый элемент массива A, поэтому количество вводимых данных должно быть равно количеству его элементов, заданных при его описании. Так как константы будут вводиться последовательно, то их ввод надо осуществлять в соответствии с расположением элементов массива в памяти ЭВМ. Например, для двумерного массива — по столбцам.

В случае, когда требуется ввести не все элементы массива или изменить последовательность их ввода, необходимо использовать либо оператор цикла, либо специальную форму оператора Read с неявным циклом. Например, ввод двумерного массива L построчно, в традиционно принятом в математике виде, с помощью операторов цикла может быть организован следующим образом:

Dimension L(0:2, 3)

Do i = 0, 2

Do j = 1, 3

Read(*, *) L(i, j)

EndDo

EndDo

Неявный цикл в операторах ввода-вывода имеет вид:

(имя_массива(переменная)[,…], переменная = начало, конец [, шаг])

где переменная – переменная цикла (обязательно целого типа);

начало и конец – выражения целого типа, определяющие начальное и конечное значения переменной цикла, соответственно;

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

Эта форма содержит все элементы оператора цикла, но есть и свои особенности:

–  в неявном цикле отсутствует ключевое слово Do;

–  тело цикла состоит из списка имен массивов, к элементам которых осуществляется последовательное обращение;

–  допускается использование вложенных неявных циклов по общим правилам организации циклов.

Тогда ввод двумерного массива L может быть организован в виде:

Dimension L(0:2, 3)

…….

Read(*, *) ((L(i, j), j = 1, 3), i = 0, 2)

Операции вывода значений элементов массивов организуются с помощью оператора Write аналогичным образом.

Работа с массивами может быть проиллюстрирована следующим примером. Имеются результаты замеров проходного сечения 45-ти жиклеров. Определить среднее арифметическое значение результатов этих замеров. Эти значения r1, r2, …, r45 удобно хранить в виде массива R(1), R(2), , …, R(45). Тогда формула для вычисления среднего арифметического значений проходного сечения

может быть представлена в программе оператором Rcp = Rsum/35 , где Rsum есть результат накопления суммы значений элементов массива R. Предполагается, что результаты замеров записаны в файл с именем prog. dat в форме, представленной ниже

Результат работы программы должен быть помещен в файл prog. res в виде

Программа имеет вид

Dimension R(45)

Open(1, File = ‘prog. dat’)

Open(2, File = ‘prog. res’)

Read(1, 1) (R(i), i = 1, 45)

1 Format(/(6F5.2))

Write(2, 2) (R(i), i = 1, 45)

2 Format(5X, ‘Результаты замеров [мм]:’/(5F6.2))

Rsum = 0.0

Do i = 1, 45

Rsum = Rsum + R(i)

EndDo

Rcp = Rsum/45.

Write(2, 3) Rcp

3 Format(T3, ‘Среднее значение Rcp = ‘, F5.3)

End

При решении ряда задач невозможно заранее прогнозировать размеры массивов, используемых для хранения информации. Вышеописанный способ использования массивов в программах требует указания в операторе Dimension его максимальных (фиксированных) размеров, а потому неэффективен. Фортран предоставляет возможность организовать динамическое изменение размера массива.

Динамическое изменение размера массива осуществляется с помощью операторов Allocate и DeAllocate. Массив с динамически изменяемыми границами описывается в начале программы перед выполняемыми операторами специальным образом с атрибутом Allocatable и указанием вместо максимальных значений индексов символа ":". Например:

Dimension Data [Allocatable] (:,:)

Real Long [Allocatable] (:)

Для выделения требуемого размера памяти ЭВМ под массивы с динамически изменяющимися размерами и установки верхней и нижней границ его индексов используется оператор Allocate. Общая форма оператора имеет вид:

Allocate (имя_массива([n:] k [, …]) [, …] [, Stat = err])

В операторе Allocate можно определять несколько массивов, разделяя их через запятую. Параметр "Stat =" указывается один раз в конце оператора. Любая неудача размещения массивов вызовет ошибку выполнения, которая отмечается в параметре "Stat =", и переменная err принимает ненулевое значение.

Освобождение памяти, которое занимал динамически распределенный массив, осуществляется оператором DeAllocate, записываемым в виде:

DeAllocate(список [, Stat = err])

где список – список динамических массивов, организованных с помощью оператора Allocate, в котором имена массивов отделяются запятыми.

Параметр "Stat =" выполняет ту же функцию, что и в операторе Allocate, и должен быть последним. Переменная err принимает значение нуль, если освобождение памяти прошло успешно.

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

Dimension R [Allocatable] (:)

Open(1, File = ‘prog. dat’)

Open(2, File = ‘prog. res’)

Write(*, 10)

10 Format(‘ Введите количество замеров N = ‘)

Read(*, *) N

Allocate (R(N), Stat = Ierr)

If (Ierr. NE.0) Stop ‘Нет памяти под массив R.’

Read(1, 1) (R(i), i = 1, N)

1 Format(/(6F6.2))

Write(2, 2) (R(i), i = 1, N)

2 Format(5X, ‘Результаты замеров [мм]:’/(5F6.2))

Rsum = 0.0

Do i = 1, N

Rsum = Rsum + R(i)

EndDo

Rcp = Rsum/N

Write(2, 3) Rcp

3 Format(/T3, ‘Среднее значение Rcp = ‘, F5.3)

DeAllocate(R)

End

Пример выполнения задания. Составить программу для вычисления среднего значение элементов массива a[10]. Исходные данные вводить из файла dan и результаты выводить в файл res.

Программа

program lab_5

implicit none

Real a(10), s, Asr

Integer i

Open(5, File = ‘dat’)

Open(6, File = ‘res’)

15 read(5,1) (a(i),i=1,10)

1 format(5f4.1)

write(6,1) (a(i),i=1,10)

s=0.

Do i=1,10

s=s+a(i)

enddo

Asr=s/10.

write(6,20) Asr

20 format(‘********************’/’ Asr=’,f6.3)

end program

Файл исходных данных dan

3.0 2.3 7.4 3.0 2.3

1.5 5.1 1.6 1.5 5.3

Файл результатов res

3.0 2.3 7.4 3.0 2.3

1.5 5.1 1.6 1.5 5.3

********************

Asr= 3.300

З а д а н и е к л а б о р а т о р н о й р а б о т е

Составить программу решения следующих задач. Исходные данные вводить из файла dan и результаты выводить в файл res.

1. Вычислить суммы столбцов двумерного массива А размерностью 4´6.

2. Найти положительные четные значения в целочисленном двумерном массиве С (3´6 элементов) и вычислить сумму их индексов.

3. Вычислить отдельно суммы и произведения положительных и отрицательных элементов массива А (3´5 элементов).

4. Составить программу поиска максимальных элементов столбцов массива A (5´5 элементов).

5. Вычислить количество положительных элементов в целочисленном массиве М (3´4 элементов), значения которых не превышают 17.

6. Найти четные отрицательные значения в целочисленном массиве N (5´3 элементов) и вычислить их сумму.

7. Определить количество отрицательных элементов, расположенных выше главной диагонали в целочисленном массиве Y (5´5 элементов), значение которых больше –10 .

8. Определить два минимальных значения в массиве D (3´3 элементов).

9. Преобразовать одномерный массив S из 15-ти элементов в двумерный – G (5´3 элементов) по столбцам.

10. Найти суммы значений элементов в столбцах верхнего треугольника целочисленного массива С (5´5 элементов).

11. Реорганизовать двумерный массив А (4´5 элементов) в одномерный массив D по строкам.

12. Сформировать одномерный массив X, значениями элементов которого являются минимальные значения элементов строк массива Н (размерностью 5´5).

13. Найти два самых больших значения двумерного массива R (3´8 элементов).

14. Вычислить сумму элементов строк массива А (4´4 элементов), для которых выполняется условие 0.5 < aij < 2.5.

15. Определить количество четных положительных значений, расположенных выше побочной диагонали целочисленного массива С (5´5 элементов).

16. Определить количество отрицательных значений среди чётных элементов строк массива F (3´6 элементов).

17. Заполнить по столбцам двумерный массив В (5´5 элементов) выше главной диагонали значениями из одномерного массива С, содержащего 10 элементов.

18. Построчно заполнить массив А (5´5 элементов) ниже побочной диагонали значениями, элементов массива R из 15-ти элементов.

19. Определить минимальное нечетное значение в целочисленном массиве X (4´5 элементов).

20. Одномерный массив R из 12-ти элементов разместить в двумерном массиве G (4´3 элементов) по строкам. Элементы массива R считывать в обратном порядке.

21. Определить суммы элементов главной и побочной диагоналей массива А (4´4 элементов).

22. Вычислить средние арифметические значения элементов строк массива D (4´4 элементов).

23. Определить средние геометрические значения элементов столбцов массива Z (4´4 элементов).

24. Определить номер строки в нижнем треугольнике матрицы  A (4´4 элементов), содержащей минимальный элемент.

25. Составить подпрограмму поиска максимального элемента двумерного массива  A (4´4 элементов), значение которого меньше 10.

26. Определить количество элементов, лежащих в диапазоне   [a, b], в двухмерном массиве  B (4´4 элементов).

27. Выполнить поиск минимального элемента на главной и побочной диагоналях двумерного массива A (4´4 элементов).

28. Определить в двумерном массиве D (4´4 элементов) количество элементов с отрицательными значениями, лежащих выше побочной диагонали.

29. Определить в двумерном массиве M (4´3 элементов) количество элементов, значения которых делится на 3 без остатка.

30. Найти индексы минимального элемента в двухмерном массиве  A (4´4 элементов).

Л А Б О Р А Т О Р Н А Я Р А Б О Т А № 6

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

С п р а в о ч н а я и н ф о р м а ц и я

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

Для выделения многократно используемых блоков команд в Фортране предусматриваются подпрограмма-функция и подпрограмма общего вида. Для выбора между ними следует придерживаться следующей рекомендации: если результатом повторяющихся вычислений является одно единственное значение, то используется подпрограмма-функция, в остальных случаях — подпрограмма общего вида.

***Замечание. Программные единицы любого типа не должны обращаться сами к себе прямо или косвенно.

Подпрограмма-функция по своему применению похожа на оператор-функцию, так как используется для вычисления единственного значения и вызывается непосредственно в арифметическом выражении прямым указанием своего имени. Отличия подпрограммы-функции от оператора-функции состоят в том, что она является отдельной программной единицей и для вычисления требуемой величины позволяет использовать более одного оператора. Первым оператором подпрограммы-функции должен быть оператор Function, который определяет ее имя и список формальных параметров:

[тип] Function имя [*длина] ([параметр_1 [, параметр_2]…])

Тип результата, возвращаемого подпрограммой-функцией, определяется типом (явно или по умолчанию) имени функции. Например:

Формальные параметры в подпрограмме могут отсутствовать, но наличие скобок в ее описании обязательно. В качестве формальных параметров могут использоваться имена переменных, массивов и внешних подпрограмм. Если в качестве формального параметра использован массив, то он должен быть описан с использованием в качестве индексов других формальных параметров.

Подпрограмма-функция должна иметь следующую структуру:

–  оператор Function;

–  группа операторов, реализующая вычислительный алгоритм;

–  оператор присваивания, в котором имени подпрограммы-функции передается значение результата вычислений;

–  оператор Return;

–  оператор End.

Например:

Function Prog(A, B, C, N)

……………

Prog = Result

Return

End

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

Обращение к подпрограмме-функции выполняется путем указания ее имени непосредственно в арифметическом выражении. При этом в скобках после имени оператора-функции указываются ее фактические параметры. В качестве фактических параметров могут использоваться выражения, имена массивов и других подпрограмм. Количество, тип и порядок следования формальных и фактических параметров должны совпадать. Фактический параметр, являющийся именем подпрограммы, должен быть описан в программной единице, вызывающей подпрограмму-функцию. Для его описания используется оператор External в форме:

External имя_подпрограммы [, …].

Например:

External Fir

An = Prog(X, A, Fir)

……….

End

Function Prog(A, B, F)

……….

Return

End

Работу с подпрограммой-функцией иллюстрирует следующий пример: написать программу для вычисления максимальных значений элементов квадратных матриц A и B, имеющих порядки 4, и 3, соответственно. Программа будет иметь вид:

Dimension A(4, 4), B(3, 3)

Real Max_1, Max_2, Max_3

Open(1, File = ‘prog. dat’)

Open(2, File = ‘prog. res’)

Read(1, 1)((A(i, j), j = 1, 4), i = 1, 4)

1 Format(9X, 4F6.2)

Read(1, 2) ((B(i, j), j = 1, 3), i = 1, 3)

2 Format(9X, 3F6.2)

Max_1 = Poisk(4, A)

Max_2 = Poisk(3, B)

Write(2, 4) ((A(i, j), j = 1,4), i = 1,4), Max_1

4 Format(4(4F6.2/), ‘ Max A = ‘, F6.2/)

Write(2, 5) ((B(i, j), j = 1,3), i = 1,3), Max_2

5 Format(3(3F6.2/), ‘ Max B = ‘, F6.2/)

End

Function Poisk(N, A)

Dimension A(N, N)

R = A(1, 1)

Do i = 1, N

Do j = 1, N

If (R. LT. A(i, j)) then

Poisk = A(i, j)

endif

enddo

enddo

Return

End

Подпрограмма общего вида используется в тех случаях, когда в качестве результата расчетов необходимо получить несколько значений. Так же, как и подпрограмма-функция, она является отдельной программной единицей и отличается от подпрограммы-функции тем, что не передает никакого численного значения, связанного с ее именем. Ввод и вывод данных осуществляется через список ее параметров, а вызов подпрограммы организуется с помощью специального оператора Call.

Первым оператором подпрограммы общего вида должен быть оператор Subroutine, который записывается в общем виде:

Subroutine имя ([параметр_1 [, параметр_2]…])

где имя – имя подпрограммы;

параметр_i – формальные параметры (i=1, 2, …).

Имя подпрограммы общего вида не имеет типа, поскольку результаты вычислений возвращаются через список параметров. Оно не должно появляться в каком-либо другом операторе подпрограммы, кроме оператора Subroutine. В качестве формальных параметров, повторение которых в описании подпрограммы не допускается, могут использоваться имена переменных, массивов и внешних подпрограмм. Если в качестве формальных параметров использованы массивы, то их необходимо описывать по тем же правилам, что и для подпрограммы-функции.

Подпрограмма общего вида имеет следующую структуру:

–  оператор Subroutine;

–  группа операторов, реализующая вычислительный алгоритм;

–  оператор Return;

–  оператор End.

Например:

Subroutine Prog(A, B, C, N)

……………

Return

End

Использование операторов Return и End аналогично их применению в подпрограмме-функции.

Обращение к подпрограмме общего вида выполняется с помощью специального оператора Call.

Call имя ([параметр_1 [, параметр_2]…])

где имя – имя подпрограммы;

параметр_i – фактические параметры (i = 1, 2, …).

В качестве фактических параметров могут использоваться выражения, имена массивов и других подпрограмм. Количество, тип и порядок следования формальных и фактических параметров должны совпадать. Фактический параметр, являющийся именем подпрограммы, должен быть описан в программной единице, вызывающей подпрограмму общего вида так же, как и для подпрограммы-функции. Оператор Call передает управление из вызывающей программы в подпрограмму общего вида и устанавливает соответствие между ее формальными параметрами и фактическими параметрами обращения.

Использование подпрограммы общего вида может быть показано на следующем примере: написать подпрограмму вычисления корней приведенного квадратного уравнения и программу ее тестирования следующими уравнениями:

1. x2 — 3x + 2 = 0;

2. x2 + 4x + 4 = 0;

В результате решения тестовых уравнений должны быть получены результаты

Программа имеет вид:

Dimension A(3, 2), X1(3), X2(3)

Open(1, File = ‘dat’)

Open(2, File = ‘res’)

Read(1, 1) ((A(i, j), j = 1, 2), i = 1, 3)

1 Format(2F6.2)

Do i = 1, 2

10 Call Roots(A(i,1), A(i,2), X1(i), X2(i))

Write(2, 2)

2 Format(‘X1’, ‘X2’)

Enddo

End

Subroutine Roots(P, Q, X1, X2)

D = (P/2)**2 — Q

If (D>=0.0) Then

X1 = — P/2 + Sqrt(D)

X2 = — P/2 — Sqrt(D)

EndIf

Return

End

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

Common список

где список — список имен переменных и массивов, разделенных запятыми.

Оператор должен оформляться в соответствии со следующими правилами:

–  имена переменных и массивов могут встречаться в списке оператора только один раз;

–  имена формальных параметров и функций в списке не до пускаются;

–  оператор Common должен располагаться в программной единице до первого выполняемого оператора.

Работа оператора Common может быть пояснена на примере:

Dimension C(3), X(3), N(3)

Common A, B, C

Open(1, File = ‘dat’)

Open(2, File = ‘res’)

………….

End

Subroutine Test(Q, X, N)

Dimension F(3)

Common P, E, F

……

Return

End

В данном случае главная программа имеет оператор Common, описывающий общий блок, который содержит значения переменных A и B и одномерного массива C из трех элементов. Такой же блок описан в подпрограмме Test, что позволяет располагать его переменные P, E и массив F в той же области памяти ЭВМ. В результате такого наложения переменные A и P, B и E, а также элементы массивов C и F будут всегда иметь одни и те же значения.

Пример выполнения задания. Написать функцию для поиска максимального значения элементов массива a[10]. Исходные данные вводить из файла dan и результаты выводить в файл res.

Программа

program lab_6

Real a(10), buf, Amax

Integer i

Open(5, File = ‘dat’)

Open(6, File = ‘res’)

15 read(5,1) (a(i),i=1,10)

1 format(5f4.1)

write(6,1) (a(i),i=1,10)

Amax=P_M(a,10)

write(6,20) Amax

20 format(‘********************’/’ Max=’,f6.3)

end program

Function P_M(a, n)

Dimension a(n)

Real buf

P_M=a(1)

Do i=2,10

if (a(i)>P_M) then

P_M=a(i)

endif

enddo

return

Файл исходных данных dan

3.0 2.3 7.4 3.0 2.3

1.5 5.1 1.6 1.5 5.3

Файл результатов res

3.0 2.3 7.4 3.0 2.3

1.5 5.1 1.6 1.5 5.3

********************

Max= 7.400

З а д а н и е к л а б о р а т о р н о й р а б о т е

Написать функцию, выполняющую указанные действия, и составить программу её тестирования. При тестировании функции использовать одномерные массивы из 10 элементов. Исходные данные вводить из файла dan и результаты выводить в файл res.

1. Вычислить сумму элементов массива с нечетными значениями.

2. Определить количество положительных элементов в массиве.

3. Вычислить сумму отрицательных элементов.

4. Найти максимальный элемент массива.

5. Вычислить среднее значение положительных элементов массива.

6. Определить количество элементов массива, значение которых больше заданного значения а.

7. Определить количество отрицательных четных элементов в массиве.

8. Определить сумму двух минимальных значений в массиве.

9. Вычислить произведение отрицательных элементов массива.

10.Найти сумму двух самых близких значений рядом стоящих элементов массива.

11.Заменить в массиве все отрицательные значения на нули.

12.Определить сумму элементов массива, значение которых меньше а.

13.Округлить значения элементов массива по правилам алгебры.

14.Вычислить количество элементов массива, значение которых лежит в заданном диапазоне [a, b].

15.Расположить элементы массива в обратном порядке.

16.Определить количество отрицательных значений среди чётных элементов массива.

17.Найти максимальный и минимальный элементы массива и обменять их значениями.

18.Определить минимальное нечётное значение в массиве.

19.Вычислить сумму элементов массива, имеющих чётные индексы.

20.Определить среднее геометрическое значение элементов массива.

21.Найти индекс минимального элемента в массиве.

22.Вычислить среднее арифметическое значение нечетных элементов массива.

23.Найти индекс максимального по модулю элемента в массиве.

24.Вычислить сумму дробных частей элементов массива.

25.Найти максимальный элемент массива, значение которого меньше заданного значения а.

26.Определить количество элементов массива, значения которых делится на 3 без остатка.

27.Найти значение, повторяющееся в массиве несколько раз.

28.Определить количество подряд стоящих отрицательных элементов в массиве.

29.Увеличить все положительные элементы массива на величину а и отрицательные на – b.

30.Вычислить количество элементов, разделяющих минимальный и максимальный элементы массива.