1
Компьютеры, периферия, мультимедиа и ПО / Re: ПОМОГИТЕ С ПАСКАЛЕМ!!!
« : 09.12.07, 11:53:26 »Составить подпрограмму, вычисляющую значение TRUE,если количество положительных элементов исходного одномерного массива больше количества его отрицательных элементов и значение FALSE в противном случае.
Если количество положительных элементов в заданном массиве В больше, чем отрицательных, подсчитать сумму индексов положительных элементов, иначе определить сумму отрицательных элементов
В=(2,5; -0,006; 45,92; 0; 2,74; -15; 51,7)
Задача 8
Создать функцию, вычисляющую количество строк матрицы А, состоящей из m строк и n столбцов, сумма элементов каждой из которых меньше нуля. Использовать функцию для вычисления указанных величин в следующих 2х матрицах: матрице С из 4х строк и 5 столбцов и матрице D из 5 строк и 3 столбцов
Задача 9
Составить процедуру, формальными параметрами которой являются 2 массива В1,В2,?Вn;С1,С2,Сm либо один из них, или матрица А из n строк и n столбцов.
Составленную процедуру использовать в основной части программы для обработки фактических массивов или матрицы.
Массив Р1,Р2,?Рn Рi=1,если в i-той строке матрицы А положительных элементов больше, чем отрицательных, иначе Рi=0
Задача 10
Разработайте программу, создав предварительно функцию или процедуру по условию задачи. Приведенные числа используйте для задания, типов данных и размеров массивов при вводе-выводе
Составить подпрограмму нахождения индексов максимального элемента матрицы. Используя такую подпрограмму найти скалярное произведение строки на столбец заданной квадратной матрицы В с номерами, соответственно равными индексам ее максимального элемента
-0,0004 2,5 6,21
В= 19 -45,1 0
-2,75 5,7 12,9
Составить процедуру, формальными параметрами которой являются 2 массива В1,В2,?Вn;С1,С2,Сm либо один из них, или матрица А из n строк и n столбцов.
Составленную процедуру использовать в основной части программы для обработки фактических массивов или матрицы.
Массив Р12,Р2,?Рm полученный из массива С1,С2,?Сm по правилу (формула с суммой на первом листе, хз как напечатать)