Варианты задания №4
Составить схему алгоритма и программу на языке VBA. Обратить особое внимание на ввод исходных данных и вывод результатов вычисления. Размер матрицы принять m x n. Параметры m и n загружаются из файла данных включающего также и матрицу, например матрица 4 x 8 в файле с именем matr.txt должна быть записана так
4 8
2 4 3 6 7 8 3 1
2 4 3 5 7 1 5 0
2 1 3 5 3 4 7 8
4 5 6 3 4 9 0 3
Результаты должны быть выведены в файл. В файле результатов вывести исходный массив, снабдив его соответствующим заголовком. Матрицы вывести в естественном виде, т.е. по строкам.
Вариант 0. В матрице размером m x n найти сумму элементов j -го столбца и сумму элементов i-ой строки, лежащих в пределах от -1 до 2. Параметры m, n, i, j ввести с помощью операторов ввода INPUTВОХ.
Вариант 1. В матрице размером 10x15 заменить все отрицательные элементы на нули. Вывести исходную матрицу и расчетную, снабдив их заголовками: МАТРИЦА ИСХОДНАЯ и МАТРИЦА РАСЧЕТНАЯ.
Вариант 2. В матрице размером m x n найти максимальное число и его координаты.
Вариант 3. В матрице размером m x n найти минимальное число и его координаты.
Вариант 4. В матрице размером m x n найти все числа, лежащие в интервале [a, b]. Вывести эти числа и их координаты.
Вариант 5. Вывести таблицу Пифагора в виде матрицы 10 х 10. Каждый элемент матрицы в таблице Пифагора вычисляется по формуле а = i*j.
Вариант 6. Вычислить вектор S, компоненты которого являются суммами элементов четных строк матрицы m x n.
Вариант 7. Вычислить вектор S, компоненты которого являются произведениями элементов нечетных столбцов матрицы m x n.
Вариант 8. Для матрицы размером m x n вычислить среднее арифметическое каждой строки.
Вариант 9. Найти сумму элементов матрицы A размером m x n, превышающих некоторое число В (удовлетворяющее условию аij > В).
Число В ввести с помощью оператора ввода INPUTВОХ.
Вариант А. Найти сумму элементов матрицы размером m x n, значения которых лежат в интервале [a, b]. Значения a и b ввести с помощью операторов ввода INPUTВОХ.
Вариант В. Определить координаты (номер строки и номер столбца) элементов матрицы размером m x n, удовлетворяющих условию аij > В. Значение В ввести с помощью оператора ввода INPUTВОХ.
Вариант С. Вычислить вектор S, компоненты которого являются суммами элементов столбцов матрицы размером m x n.
Вариант D. Вычислить вектор S, компоненты которого являются суммами элементов столбцов матрицы размером m x n.
Вариант Е. Для матрицы A размером m x n вычислить среднее арифметическое всех элементов, удовлетворяющих условию aij> С. Значение С ввести с помощью оператора ввода INPUTBOX.
Вариант F. Для матрицы A размером m x n вычислить среднее арифметическое каждого столбца под каждым ее столбцом.
Пример выполнения задания №4
Задание
Для матрицы A размером m x n вычислить сумму отрицательных чисел элементов матрицы.
Схема алгоритма представлена на рисунке 14.
Рисунок 14 – Схема алгоритма
Создадим матрицу размерностью m x n, например 3х4
На диске С:\ создайте папку «Kyrsovaya rabota Familiya» для названия папки и файлов используйте латинские буквы! В программе Блокнот создайте файл matr.txt с исходной матрицей и сохраните его на диске С:\Kyrsovaya rabota Familiya\matr.txt (рисунок 15). Название Familiya заменим, например, на Ivanov (если Ваша фамилия - Иванов).
Рисунок 15 – Исходная матрица
Затем загрузите приложение Visual Basic (в программе Microsoft Word нажмите сочетание клавиш Alt+F11) и в Project Modules откройте New Macros (Module 1). В правом окне запишите текст программы заданной процедуры (программы).
Рисунок 16 – Окно приложения Visual Basic – Project Modules
В данной программе используется два текстовых файла: matr.txt и rez.txt.
В файле matr.txt записана исходная матрица.
В файл rez.txt будет записан результат выполнения программы и расположен так же на диске С:\Kyrsovaya rabota Ivanov\rez.txt.
Текст программы
При нажатии функциональной клавиши F5(выполнение программы), мы увидим на поле документа сообщение MsgBox «Смотри файл C:\Kyrsovaya rabota Ivanov\rez.txt». Нажмите клавишу Ок. Затем откройте файл на диске С:\Kyrsovaya rabota Ivanov\rez.txt. (рисунок 15).
Рисунок 15 – Результат задания