Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
5 Процедуры и функции.doc
Скачиваний:
1
Добавлен:
06.12.2018
Размер:
145.92 Кб
Скачать
      1. Результат

Рисунок после запуска программы из BorlandPascal для DOS.

Рис. 2

3.3.4 Варианты заданий

  1. Сформировать две квадратные матрицы (двухмерных массива) {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), вводом элементов с клавиатуры. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать функцию, определяющую сумму элементов строк матрицы, если на главной диагонали матрицы располагается отрицательный элемент. Вывести на экран матрицы, сумму матриц и максимальную из них.

  2. Сформировать матрицы (двухмерный массив) {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) , элементы которых определяются случайно из диапазона вещественных чисел от 0 до 1. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, определяющую одномерный массив (вектор), состоящий из сумм каждого столбца матрицы. Причем суммируются элементы . Вывести на экран исходные и результирующие массивы.

  3. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), по заданным правилам: (i+j)/2, (i*j)/. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы, а также признак выбора заданного правила вводить с клавиатуры. Создать процедуру, определяющую одномерный массив (вектор), состоящий из сумм каждой строки матрицы с четными номерами. Вывести на экран исходные и результирующие массивы.

  4. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), по заданному правилу sin(i+j/2). Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать функцию, определяющую сумму первой строки и последнего столбца матрицы. Вывести на экран исходные массивы и среднее значение сумм.

  5. Сформировать две квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), вводом элементов с клавиатуры. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать функцию, определяющую произведение элементов столбцов матрицы, если на главной диагонали матрицы располагается не нулевой элемент. Вывести на экран матрицы, произведение матриц и среднее произведение.

  6. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) , элементы которых определяются случайно из диапазона целых чисел от -3 до 3. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, которая присваивает нулевым элементам матрицы единицы и определяет произведение матрицы. Вывести на экран исходные, результирующие массивы и сумму произведений матриц.

  7. Сформировать две квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), вводом элементов с клавиатуры. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать функцию, определяющую сумму элементов строки матрицы, имеющей первый минимальный элемент. Вывести на экран матрицы, сумму матриц и максимальную из них.

  8. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) , элементы которых определяются случайно из диапазона целых чисел от -3 до 3. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, которая определяет последний минималь­ный элемент в трех средних строках матрицы. Заменить в матрице этот элемент нулем. Вывести на экран: исходные, результирующие массивы.

  9. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) по заданным правилам: sin((i+j)/2), cos(5j-2i). Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы, а также признак выбора заданного правила вводить с клавиатуры. Создать процедуру, заменяющую все отрицательные элементы матрицы на положительные элементы. Вывести на экран исходные и результирующие матрицы.

  10. Сформировать две квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), вводом элементов с клавиатуры. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, которая заменяет нулевые диагональные элементы единицами. Вывести на экран исходные и результирующие матрицы.

  11. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) , элементы которых определяются случайно из диапазона целых чисел от -3 до 3. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, которая определяет все максимальные по модулю элементы, если их несколько, в трех последних столбца матрицы и заменяет их суммой элементов соответствующего столбца. Вывести на экран исходные и результирующие массивы.

  12. Сформировать квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), по заданным правилам: sin(i/5+j), cos(2i+3/2j). Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы, а также признак выбора заданного правила вводить с клавиатуры. Создать процедуру, заменяющую все положительные элементы, лежащие выше главной диагонали, исходной матрицы нулями. Вывести на экран исходные и результирующие матрицы.

  13. Сформировать две квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), вводом элементов с клавиатуры. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать функцию, определяющую количество отрицательных элементов, лежащих ниже главной диагонали. Вывести на экран исходные и результирующие матрицы.

  14. Сформировать матрицы{aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) , элементы которых определяются случайно из диапазона целых чисел от -100 до 100. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать функцию, которая меняет местами наиболь­ший и наименьший элемент матрицы. Вывести на экран: исходные, результирующие массивы, а также наибольший и наименьший элементы матриц.

  15. Сформировать квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l),по заданным правилам: sin(3i+j), 3.5i+j/2. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы, а также признак выбора заданного правила вводить с клавиатуры. Создать функцию, определяющую суммы наибольших и наименьших значений элементов каждой строки матрицы. Вывести на экран исходные матрицы и их суммы.

  16. Сформировать две матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), вводом элементов с клавиатуры. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, формирующую новую матрицу путем деления всех элементов исходной матрицы на ее наибольший по модулю элемент. Вывести на экран исходные и результирующие матрицы.

  17. Сформировать матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l) , элементы которых определяются случайно из диапазона целых чисел от -100 до 100. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, определяющую одномерный массив (вектор), состоящий из минимальных элементов строк матрицы. Вывести на экран: исходные матрицы, вектора и наименьшую сумму векторов.

  18. Сформировать квадратные матрицы {aij}n,m , {bij}k,l , где i<=(n,k), j<=(m,l), элементы которых определяются случайно из диапазона вещественных чисел от -50 до 50. Фактическое число строк (n,k) и столбцов (m,l) каждой матрицы вводить с клавиатуры. Создать процедуру, определяю­щую одномерный массив (вектор), состоящий из максимальных элементов столбцов матрицы. Вывести на экран: исходные матрицы, результирующие вектора и произведение векторов, при условии, что количество строк первой матрицы равно количеству столбцов второй матрицы.