Написать программу, содержащую подпрограмму

18.1) для замены в массиве Y(50) всех элементов с четными индексами на значение 1;

18.2) для замены знака каждого пятого элемента массива В(100) на противоположный;

18.3) для вычисления суммы отрицательных элементов массива А(200);

18.4) для расчета числа положительных элементов массива В(10,20);

18.5) для вычисления куба суммы положительных элементов массива Х(15,30);

18.6) для расчета суммы элементов второй строки матрицы Z(20,10);

18.7) для вычисления суммы элементов пятого столбца матрицы Z(10,20);

18.8) для отыскания минимального элемента массива Х(25);

18.9) для отыскания максимального элемента массива В(20,30) и индексов этого элемента;

18.10) для вычисления k! = 1·2·3·…·k;

18.11) для замены в матрице А(10,10) всех элементов, стоящих на главной диагонали, на число 2;

18.12) для вычисления квадрата суммы тех элементов массива В(100), значения которых меньше 10;

18.13) для вычисления суммы положительных элементов первой строки матрицы С(10,20);

18.14) для вычисления количества элементов матрицы В(30,30), значения которых лежат в интервале (2,5);

18.15) для расчета квадратного корня из суммы положительных элементов массива Х(m,n);

18.16) для вычисления минимального элемента пятой строки матрицы С (m,n) и номера столбца, в котором находится этот элемент;

18.17) для расчета количества нулевых элементов массива Х(k,n);

18.18) для замены знака на противоположный у всех элементов массива Z(150) с нечетными индексами;

18.19) для вычисления следа (суммы элементов главной диагонали) квадратной матрицы В(m,m);

18.20) для замены знака на противоположный у всех элементов пятого столбца матрицы А(m,n);

18.21) для вычисления максимального элемента матрицы Z(20,30) и определения номеров строки и столбца, которым принадлежит этот элемент;

18.22) для вычисления количества элементов массива Х(10,25), значения которых больше 10, и вычисления квадратного корня из суммы этих элементов;

18.23) для вычисления количества нулевых элементов первого столбца матрицы А(m,n);

18.24) для вычисления минимального элемента n-ой строки матрицы С(m,k);

18.25) для вычисления количества элементов массива Y(20,30), значения которых лежат в интервале (0,2);

18.26) для расчета тангенса суммы положительных элементов массива Z(m,n);

18.27) для вычисления максимального и минимального элементов пятого столбца матрицы В(20,15) и определения номеров строк, в которых стоят эти элементы;

18.28) для замены всех элементов k-го столбца матрицы А(n,m) на число 1;

18.29) для расчета количества ненулевых элементов первой строки матрицы В(k,m);

18.30) для нахождения количества положительных, отрицательных и нулевых элементов массива С(20,30).

Список литературы

1. Информатика. Базовый курс/Симонович С. В. и др. – СПб.: Питер, 2000.

2. Турбо Паскаль 7.0. – К.: Издательская группа BHV,2000.

3. Культин Н. Б. Turbo Pascal в задачах и примерах. – СПб.: БХВ,2000.

4. Немнюгин С.А. Turbo Pascal. – СПб.: Питер, 2002.

5. Немнюгин С.А. Turbo Pascal: практикум. – СПб.: Питер, 2002.

6. Основы работы в среде Turbo Pascal. Методические указания. / Сост. Бобкова В.А.,Никифоров Ю.И.. Иван. гос. хим.-технол. ун-т, 2002.

7. Информатика. Часть 2. Алгоритмизация и программирование: Метод. указания и контрольные работы для студентов заочного обучения / Сост. Бобков С.П., Бобкова В.А. Иван. гос. хим.-технол. ун-т, 2002.

Техн. редактор Г. В. Куликова

Подписано в печать 4.04.2007. Формат . Бумага писчая. Усл. печ. л. 2,33. Уч. - изд. л. 2,58. Тираж 500 экз. Заказ

ГОУ ВПО «Ивановский государственный химико-технологический университет»

153000, г. Иваново, пр. Ф. Энгельса, 7