ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 19.06.2025
Просмотров: 212
Скачиваний: 0
16. Составьте программу на языке VBA, которая определяет количество
четных элементов, стоящих на нечетных местах в массиве неотрицательных чисел. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 3 2 0 6 1) |
Таких чисел: 2 |
17. Составьте программу на языке VBA, которая заменяет нулями нечетные элементы массива, стоящие на четных местах. размерностью n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке. В массиве – n положительных элементов.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 3 3 2 4 1 1) |
Новый массив: (2 0 3 2 4 0 1) |
18. Составьте программу на языке VBA, которая меняет местами элементы массива, стоящие на нечетных и четных местах. В массиве четное число элементов.
Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 0 или n - нечетное), выдавать сообщение об ошибке. В массиве – n положительных элементов.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 3 |
Введите четное n |
|
2. Введите размерность массива n: -1 |
Неверно введено n |
|
3. Введите размерность массива n: 8 Массив: (2 3 3 2 4 1 1 0) |
Новый массив: (3 2 2 3 1 4 0 1) |
19. Составьте программу на языке VBA, которая определяет, насколько максимальный элемент массива больше минимального. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 3 3 2 4 1 1) |
Разница между 4 и 1: 3 |
20. Составьте программу на языке VBA, которая определяет, сколько минимальных элементов содержит массив. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 2), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 2 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 3 2 4 1 1) |
Минимальных: 2 |
21. Составьте программу на языке VBA, которая вычисляет количество
положительных, отрицательных и нулевых элементов в одномерном массиве из n чисел. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 0 2 -4 -1 1) |
Положительных: 4 Отрицательных: 2 Нулей: 1 |
22. Составьте программу на языке VBA, которая вычисляет количество
четных и нечетных элементов в одномерном массиве из n неотрицательных чисел. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 0 1 4 1 8) |
Четных: 5 Нечетных: 2 |
23. Составьте программу на языке VBA определяет сумму квадратных корней из неотрицательных элементов массива размерностью n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (9 4 0 1 -4 1 36) |
Получилось: 13 |
24. Составьте программу на языке VBA, которая заменяет элементы массива из n элементов, равные m, числом l. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Введите m: 3 Введите l: 2 Массив: (3 5 0 3 -4 1 3) |
Новый массив: (2 5 0 2 -4 1 2) |
25. Составьте программу на языке VBA, которая вычисляет произведение P
отрицательных элементов, стоящих на четных местах в одномерном массиве длиной n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 0 -1 4 -1 8) |
P = 1 |
26. Составьте программу на языке VBA, которая возводит в квадрат
отрицательные элементы массива длиной n элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 0 -1 4 -1 8) |
Новый массив: (2 4 0 1 16 1 8) |
27. Составьте программу на языке VBA, которая вычисляет количество пар
знакочередующихся соседних элементов в одномерном массиве ненулевых элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 1 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 1 -1 4 -1 8) |
Ответ: 4 |
28. Составьте программу на языке VBA, которая вычисляет количество элементов в одномерном массиве, попадающих в интервал [a;b]. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n <= 0, a>b), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 0 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Введите a: 5 Введите b: 2 |
Неверно введены a или b |
|
3. Введите размерность массива n: 7 Введите a: 2 Введите b: 5 Массив: (2 4 1 -1 4 -1 8) |
Ответ: 3 |
29. Составьте программу на языке VBA, которая определяет номер
последнего отрицательного элемента в одномерном массиве размерностью n
элементов. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n < 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 0 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 1 -1 4 -1 8) |
Ответ: 6 |
30. Составьте программу на языке VBA, которая определяет симметричность массива относительно центрального элемента. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n < 1), выдавать сообщение об ошибке.
|
Исходные данные: |
Результат: |
|
1. Введите размерность массива n: 0 |
Неверно введено n |
|
2. Введите размерность массива n: 7 Массив: (2 4 1 -1 4 -1 8) |
Ответ: Нет |
|
3. Введите размерность массива n: 7 Массив: (2 3 4 -1 4 3 2) |
Ответ: Да |