ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 16.07.2025
Просмотров: 489
Скачиваний: 0
Введите количество |
|
столбцов массива m: 2 |
|
æ1 |
1,1ö |
Массив: ç |
÷ |
ç |
÷ |
è2 |
5 ø |
3. Введите количество |
3. 2-ая строка |
||||
строк массива n: 3 |
|||||
Введите количество |
|||||
столбцов массива m: 4 |
|||||
æ1 |
0 |
- 4,6 |
2ö |
||
ç |
0 |
2 |
1,1 |
0 |
÷ |
Массив: ç |
÷ |
||||
ç |
1 |
2 |
3 |
4 |
÷ |
è |
ø |
||||
11. Составьте программу на языке VBA, которая определяет максимальный элемент и ставит его первым в одномерной матрице A длинной n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
матрицы n: –7 |
|||
2. |
Введите размерность |
2. |
Максимальный элемент 11,6; |
матрицы n: 6 |
матрица: 11,6 2 5 − 7,1 2 1 |
||
Матрица: (− 7,1 2 5 11,6 2 1)
12. Составьте программу на языке VBA, которая определяет наименьший
элемент в секторе над главной диагональю и наименьший элемент в секторе под главной диагональю, а затем заменяет наибольшим из них элементы главной диагонали квадратной матрицы An×n . Программа должна проверять правильность
введенных пользователем |
данных |
и, если |
они |
неверные (n ≤ 0), выдавать |
|||
сообщение об ошибке. |
|||||||
Исходные данные: |
Результат: |
||||||
1. Введите размерность |
1. Неверно введено n |
||||||
матрицы n: –2 |
|||||||
2. Введите размерность |
2. Наименьший элемент над главной |
||||||
матрицы n: 3 |
диагональю равен –3. |
||||||
Наименьший элемент под главной |
|||||||
æ 1 |
- 3 |
-1,2ö |
диагональю равен - 4. |
||||
Матрица : |
|||||||
ç |
- 4 |
25 |
5 |
÷ |
|||
Матрица: ç |
÷ |
- 4 |
- 3 |
-1,2 |
|||
ç |
1 |
6 |
2,6 |
÷ |
|||
è |
ø |
- 4 |
- 4 |
5 |
|||
1 |
6 |
- 4 |
|||||
13. Составьте программу на языке VBA, которая вычисляет среднее арифметическое ненулевых элементов в одномерной матрице A длинной n элементов. Программа должна проверять правильность введенных пользователем
31
данных и, если они неверные (n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
матрицы n: –2 |
|||
2. |
Введите размерность |
2. |
Среднее арифметическое ненулевых |
матрицы n: 5 |
элементов равно 1,3250 |
||
Массив: (1,3 − 5 6 0 |
3) |
||
14. Составьте программу на языке VBA, которая вычисляет сумму положительных элементов по строкам в двумерном массиве An×m . Программа
должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0, m ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||||
1. Введите количество |
1. Неверные исходные данные |
||||
строк массива n: 0 |
|||||
Введите количество |
|||||
столбцов массива m: 4 |
|||||
2. Введите количество |
2. Сумма положительных элементов: |
||||
строк массива n: 3 |
1-й строки равна 5 |
||||
Введите количество |
2-й строки равна 3,5 |
||||
столбцов массива m: 4 |
3-й строки равна 0 |
||||
æ- 9 |
-1,5 |
5 |
0 ö |
||
ç |
0,5 |
- 2 |
- 5 |
3 |
÷ |
Массив: ç |
÷ |
||||
ç |
-1 |
0 |
- 6 |
- 4 |
÷ |
è |
ø |
||||
15. Составьте программу на языке VBA, которая сортирует по убыванию одномерный массив размерностью n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
массива n: –8 |
|||
2. |
Введите размерность |
2. |
Массив: 8,6 7 7 –6 –7,8 |
массива n: 5 |
|||
Массив: (− 7,8 7 8,6 |
− 6 7) |
||
16. Составьте программу на языке VBA, которая определяет количество единичных столбцов и нулевых строк в двумерном массиве An×m . Программа
должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0, m ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
1. Введите количество |
1. Неверные исходные данные |
строк массива n: 2 |
|
Введите количество |
|
столбцов массива m: 0 |
32
2. Введите количество |
2. 1 – единичн(ый, ых) столбец(а, ов); |
строк массива n: 2 |
0 – нулев(ая, ых) строк(а) |
Введите количество |
|
столбцов массива m: 3 |
æ1 2,2 1ö
Массив: çç ÷÷ è0 1 1ø
17. Составьте программу на языке VBA, которая переворачивает на 1800 одномерный массив размерностью n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
массива n: 0 |
|||
2. |
Введите размерность |
2. |
Массив: –3 0 8 4 –5 6,2 1 |
массива n: 7 |
|||
Массив: (1 6,2 − 5 4 8 0 |
− 3) |
||
18. Составьте программу на языке VBA, которая вычисляет сумму L положительных элементов квадратной матрицы An×n и заменяет отрицательные
элементы побочной диагонали на L . Программа должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
|||||||
1. Введите размерность |
1. Неверно введено n |
|||||||
матрицы n: –2 |
||||||||
2. Введите размерность |
2. Сумма положительных элементов |
|||||||
матрицы n: 3 |
равна 9. |
|||||||
æ1,5 |
0 |
- 4ö |
Матрица : |
|||||
1,5 |
0 |
9 |
||||||
ç |
1 |
- 6 |
4,5 |
÷ |
||||
Матрица: ç |
÷ |
1 |
9 |
4,5 |
||||
ç |
0 |
2 |
- 3 |
÷ |
||||
è |
ø |
0 |
2 |
- 3 |
||||
19. Составьте программу на языке VBA, которая определяет, какой из элементов чаще всего встречается в одномерной матрице A длинной n элементов и сколько раз. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
матрицы n: –7 |
|||
2. |
Введите размерность |
2. Равных элементов нет |
|
матрицы n: 4 |
|||
Матрица: (1 2 − 0,8 |
4) |
||
3. |
Введите размерность |
3. |
Чаще всего встречается элемент 2 |
33
матрицы n: 6 |
(3 раз(а)) |
Матрица: (1,9 |
2 2 1 2 1) |
20. Составьте программу на языке VBA, которая определяет строку с
наименьшей суммой и переставляет ее с первой строкой в двумерном массиве An×m . Программа должна проверять правильность введенных пользователем
данных и, если они неверные (n ≤ 0, m ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
|||||||
1. Введите количество |
1. Неверные исходные данные |
|||||||
строк массива n: –1 |
||||||||
Введите количество |
||||||||
столбцов массива m: 2 |
||||||||
2. Введите количество |
2. 2-ая строка с наименьшей суммой. |
|||||||
строк массива n: 3 |
Массив: |
|||||||
0 |
2 |
1 |
0 |
|||||
Введите количество |
1 |
0 |
4,5 |
- 0,5 |
||||
1 |
4 |
3 |
4 |
|||||
столбцов массива m: 4 |
||||||||
æ1 |
0 |
4,5 |
- 0,5 |
ö |
||||
ç |
0 |
2 |
1 |
0 |
÷ |
|||
Массив: ç |
÷ |
|||||||
ç |
1 |
4 |
3 |
4 |
÷ |
|||
è |
ø |
|||||||
21. Составьте программу на языке VBA, которая вычисляет количество положительных, отрицательных и нулевых элементов в одномерном массиве из n чисел. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
массива n: –7 |
|||
2. |
Введите размерность |
2. |
В массиве 4 положительн(ый, ых) |
массива n: 7 |
элемент(а, ов), 1 отрицательн(ый, ых) |
||
Массив: (0 1,1 2 − 5 0 |
2 8) |
элемент(а, ов), 2 нулевых(ой, ых) |
|
элемент(а, ов) |
|||
22. Составьте программу на языке VBA, которая вычисляет минимальный элемент L главной диагонали квадратной матрицы An×n и заменяет элементы
побочной диагонали на L . Программа должна проверять правильность введенных
пользователем данных и, если |
они неверные ( n ≤ 0), выдавать сообщение об |
||
ошибке. |
|||
Исходные данные: |
Результат: |
||
1. |
Введите размерность |
1. |
Неверно введено n |
матрицы n: 0 |
|||
2. |
Введите размерность |
2. |
Минимальный элемент главной |
матрицы n: 3 |
диагонали равен 2. |
||
34