ВУЗ: Не указан
Категория: Не указан
Дисциплина: Не указана
Добавлен: 16.07.2025
Просмотров: 488
Скачиваний: 0
программы. Программа должна проверять правильность введенных
пользователем данных и, если они неверные ( n ≤ 0), |
выдавать сообщение об |
|||||||||||
ошибке. |
||||||||||||
Исходные данные: |
Результат: |
|||||||||||
1. Введите n: 0 |
1. Неверно введено n |
|||||||||||
2. Введите n: 5 |
2. Количество положительных чисел равно 2 |
|||||||||||
Введите 1-е целое число: 9 |
||||||||||||
Введите 2-е целое число: 0 |
||||||||||||
Введите 3-е целое число: –13 |
||||||||||||
Введите 4-е целое число: 14 |
||||||||||||
Введите 5-е целое число: 0 |
||||||||||||
3. Введите n: 3 |
3. Положительных чисел нет |
|||||||||||
Введите 1-е целое число: –12 |
||||||||||||
Введите 2-е целое число: –17 |
||||||||||||
Введите 3-е целое число: –3 |
||||||||||||
9. Составьте блок-схему и программу на языке VBA, которая вычисляет |
||||||||||||
сумму знакочередующего ряда −1+ |
x2 |
− |
x3 |
+ K+ (−1)n |
xn |
+K, при |
x |
≤ 1. Расчет |
||||
2! |
3! |
n! |
||||||||||
продолжать до тех пор, пока модуль последнего вычисленного члена будет меньше e. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( x > 1,e ≤ 0 ), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
|
1. |
Введите x: 1,5 |
1. Неверно введены данные |
Введите e: 0,01 |
||
2. |
Введите x: 0,5 |
2. Сумма ряда равна –0,8932291667 |
Введите e: 0,002 |
||
10. Составьте блок-схему и программу на языке VBA, которая вычисляет |
||
наибольший общий делитель двух целых чисел. |
||
Исходные данные: |
Результат: |
|
1. |
Введите первое целое число: 3 |
1. 1 – наибольший общий делитель чисел |
Введите второе целое число: 7 |
чисел 3 и 7 |
|
2. |
Введите первое целое число: 12 |
2. 3 – наибольший общий делитель чисел |
Введите второе целое число: 9 |
чисел 12 и 9 |
|
11. Составьте блок-схему и программу на языке VBA, которая определяет в водимой последовательности хотя бы два равных соседних члена (длина последовательности не ограничена). Признаком конца последовательности является ввод нуля.
Исходные данные: |
Результат: |
||
1. |
Введите число: 1,5 |
1. |
Во введенной последовательности нет |
Введите число: –1 |
равных соседних членов |
||
Введите число: 2,3 |
|||
Введите число: 7 |
|||
Введите число: 0 |
|||
2. |
Введите число: –11,5 |
2. |
Во введенной последовательности есть |
Введите число: 1 |
равные соседние члены |
||
Введите число: 1 |
|||
21
Введите число: 7,6 Введите число: 4 Введите число: 0
12. Составьте блок-схему и программу на языке VBA, которая вычисляет сумму первых n членов ряда 1+ 12 + 13 +K+ 1n +K. Количество суммируемых
членов ряда задается во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n £ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
|
1. Введите n: 0 |
1. |
Неверно введено n |
2. Введите n: 5 |
2. |
Сумма первых 5 членов ряда |
равна 2,2833333
13. Составьте блок-схему и программу на языке VBA, которая определяет наибольшее из всех отрицательных чисел во вводимой последовательности из n целых чисел. Количество чисел последовательности должно вводиться во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n £ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите n: –5 |
1. |
Неверно введено n |
2. |
Введите n: 5 |
2. |
Наибольший из отрицательных чисел |
Введите 1-е целое число: 0 |
равен –10 |
||
Введите 2-е целое число: –51 |
|||
Введите 3-е целое число: 1 |
|||
Введите 4-е целое число: –10 |
|||
Введите 5-е целое число: 6 |
|||
3. |
Введите n: 3 |
3. |
Отрицательных чисел нет |
Введите 1-е целое число: 2 |
|||
Введите 2-е целое число: 4 |
|||
Введите 3-е целое число: 7 |
|||
14. Составьте блок-схему и программу на языке VBA, которая вычисляет факториал числа n, введенного с клавиатуры (Факториалом числа n называется произведение целых чисел от 1 до n: n!= 1× 2×K× n . Например, 0!= 1, 1!= 1, 5!= 120 ). Число n задается во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n < 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
|
1. |
Введите n: –1 |
1. Неверно введено n |
2. |
Введите n: 7 |
2. 7!=5 040 |
15. Составьте блок-схему и программу на языке VBA, которая вычисляет сумму первых n членов последовательности 1, 3, 5, 7,K. Количество суммируемых членов последовательности задается во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n £ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
22
1. Введите n: 0 |
1. |
Неверно введено n |
2. Введите n: 4 |
2. |
Сумма первых 3 членов |
последовательности равна 16 |
16. Составьте блок-схему и программу на языке VBA, которая вычисляет
сумму положительных чисел из введенной с клавиатуры последовательности целых чисел (длина последовательности не ограничена). Признаком конца последовательности является ввод нуля.
Исходные данные: |
Результат: |
||
1. |
Введите целое число: 1 |
1. |
Сумма положительных чисел равна 15 |
Введите целое число: –1 |
|||
Введите целое число: 2 |
|||
Введите целое число: 12 |
|||
Введите целое число: 0 |
|||
2. |
Введите целое число: –3 |
2. |
Положительных чисел нет |
Введите целое число: –5 |
|||
Введите целое число: –17 |
|||
Введите целое число: 0 |
|||
3. |
Введите целое число: 0 |
3. |
Последовательность не введена |
17. Составьте блок-схему и программу на языке VBA, которая определяет минимальное число из введенной с клавиатуры последовательности n чисел.
Количество чисел последовательности должно вводиться во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
|||||||||
1. Введите n: –6 |
1. Неверно введено n |
|||||||||
2. Введите n: 4 |
2. Минимальное число: –3,3 |
|||||||||
Введите 1-е число: –1 |
||||||||||
Введите 2-е число: 5,6 |
||||||||||
Введите 3-е число: –3,3 |
||||||||||
Введите 4-е число: 4,7 |
||||||||||
18. Составьте блок-схему и программу на языке VBA, которая вычисляет |
||||||||||
сумму ряда 1+ |
x |
+ |
x2 |
+K+ |
xn−1 |
+K, при |
x |
< 1. Расчет продолжать до тех пор, |
||
2 |
3 |
n |
||||||||
пока модуль последнего вычисленного члена будет меньше e. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( x ³ 1, e ≤ 0 ), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите x: 0,6 |
1. |
Неверно введены данные |
Введите e: –0,01 |
|||
2. |
Введите x: 0,3 |
2. |
Сумма ряда равна 1,18891377 |
Введите e: 0,00001 |
|||
19. Составьте блок-схему и программу на языке VBA, которая вычисляет количество нулей во вводимой последовательности из n целых чисел. Количество чисел последовательности должно вводиться во время работы программы.
23
Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||||||
1. Введите n: 0 |
1. Неверно введено n |
||||||
2. Введите n: 7 |
2. Количество нулей равно 2 |
||||||
Введите 1-е целое число: 5 |
|||||||
Введите 2-е целое число: 0 |
|||||||
Введите 3-е целое число: –3 |
|||||||
Введите 4-е целое число: 4 |
|||||||
Введите 5-е целое число: –7 |
|||||||
Введите 6-е целое число: 0 |
|||||||
Введите 7-е целое число: –78 |
|||||||
3. Введите n: 3 |
3. Нулей нет |
||||||
Введите 1-е целое число: 8 |
|||||||
Введите 2-е целое число: 9 |
|||||||
Введите 3-е целое число: –30 |
|||||||
20. Составьте блок-схему и программу на языке VBA, которая вычисляет |
|||||||
сумму первых n членов ряда 1+ |
x |
+ |
x2 |
+ |
x3 |
+K, где x – любое число. Количество |
|
2 |
3 |
4 |
|||||
суммируемых членов ряда задается во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные (n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
||
1. |
Введите n: 0 |
1. |
Неверно введено n |
Введите x: 1,2 |
|||
2. |
Введите n: 3 |
2. |
Сумма первых 3 членов ряда |
Введите x: 1,4 |
равна 2,353333 |
||
21. Составьте блок-схему и программу на языке VBA, которая вычисляет все делители натурального числа a. Программа должна проверять правильность введенных пользователем данных и, если они неверные (a ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
1.Введите натуральное число: –3 1. –3 – не является натуральным числом
2.Введите натуральное число: 10 2. Делителями числа 10 являются: 1, 2, 5, 10
22. Составьте блок-схему и программу на языке VBA, которая вычисляет, сколько раз последовательность меняет знак (длина последовательности не ограничена). Признаком конца последовательности является ввод нуля.
Исходные данные: |
Результат: |
||
1. |
Введите число: 10 |
1. |
Последовательность меняет знак 1 раз |
Введите число: –15 |
|||
Введите число: 13 |
|||
Введите число: 1,7 |
|||
Введите число: 0 |
|||
2. |
Введите число: 17 |
2. |
Последовательность не меняет знак |
Введите число: 12,4 |
|||
Введите число: 0 |
|||
24
23. Составьте блок-схему и программу на языке VBA, которая вычисляет количество мужчин (муж), стоящих в начале очереди до первой женщины (жен). Количество человек n в очереди должно вводиться во время работы программы. Программа должна проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0), выдавать сообщение об ошибке.
Исходные данные: |
Результат: |
1. Введите количество человек |
1. Неверно введено n |
вочереди n: –4
2.Введите количество человек 2. В начале очереди стоит 3 мужчин(а, ы)
вочереди n: 5
Введите пол 1-го человека: муж Введите пол 2-го человека: муж Введите пол 3-го человека: муж Введите пол 4-го человека: жен Введите пол 5-го человека: муж
3. Введите количество человек 3. В начале очереди нет мужчин в очереди n: 4
Введите пол 1-го человека: жен Введите пол 2-го человека: муж Введите пол 3-го человека: муж Введите пол 4-го человека: жен
24. Составьте блок-схему и программу на языке VBA, которая вычисляет
среднее арифметическое положительных чисел из введенной с клавиатуры последовательности целых чисел (длина последовательности не ограничена). Признаком конца последовательности является ввод нуля.
Исходные данные: |
Результат: |
||
1. |
Введите целое число: 3 |
1. |
Среднее арифметическое положительных |
Введите целое число: 8 |
чисел равна 5,000 |
||
Введите целое число: –10 |
|||
Введите целое число: 4 |
|||
Введите целое число: 0 |
|||
2. |
Введите целое число: –12 |
2. |
Положительных чисел нет |
Введите целое число: –4 |
|||
Введите целое число: –7,7 |
|||
Введите целое число: 0 |
|||
3. |
Введите целое число: 0 |
3. |
Последовательность не введена |
25. Составьте блок-схему и программу на языке VBA, которая определяет, является ли последовательность знакочередующейся (длина последовательности не ограничена). Признаком конца последовательности является ввод нуля.
Исходные данные: |
Результат: |
||
1. |
Введите число: 10,6 |
1. |
Последовательность знакочередующейся |
Введите число: –1,6 |
|||
Введите число: 1,6 |
|||
Введите число: –1,7 |
|||
Введите число: 11 |
|||
Введите число: 0 |
|||
2. |
Введите число: –7,9 |
2. |
Последовательность не является |
25