Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
vba продолжение.docx
Скачиваний:
7
Добавлен:
18.12.2018
Размер:
101.84 Кб
Скачать

II. Задания по циклическим алгоритмам

1. Составить блок-схему *

и разработать программу ***

с циклами, выдающими на *****

печать картинку: *******

2. Составить блок-схему *******

и разработать программу *****

с циклами, выдающими на ***

печать картинку: *

3. Составить блок-схему 1

и разработать программу 1 2

с циклами, выдающими на 1 2 3

печать последовательность 1 2 3 4

чисел 1 2 3 4 5

4. Составить блок-схему 1

и разработать программу 2 2

с циклами, выдающими на 3 3 3

печать последовательность 4 4 4 4

чисел 5 5 5 5 5

5. Для матрицы В размером 5х5 вычислить сумму элементов (SUM), расположенных на главной диагонали и выше. Исходные данные задать самостоятельно.

6. Для матрицы В размером 5х5 вычислить сумму элементов (SUM), расположенных на главной диагонали. Исходные данные задать самостоятельно.

7. Для матрицы В размером 5х5 вычислить сумму четных элементов столбца J=3. Исходные данные задать самостоятельно.

8. Для матрицы В размером 5х5 вычислить сумму нечетных элементов строки I=3. Исходные данные задать самостоятельно.

9. Определить количество отрицательных, положительных и нулевых элементов одномерного массива А (а1, а2, ..., аi,...,аn). Исходные данные задать самостоятельно.

10. Для группы N определить количество студентов, получивших оценки “2”, “3”, “4”, “5”. Исходные данные задать самостоятельно.

11. Найти приближенный корень уравнения X = a*COS(ax) по итерационной формуле Хi+1= f(Хi), i=0,1,... Вычисления прекращаются, когда |Хi+1-Xi|<=e, где e- заданная точность вычислений. Метод применим при |A|<1.

12. Вычислить значение квадратного корня y =корню квадратному из х по итерационной формуле Ньютона Yi+1=Yi+1/2(X/Yi-Yi) i =0,1,2,..., где Yi+1 и Yi - два последовательных приближения к искомому корню. За начальное приближение корня взять Y0 =1. Итерационный процесс для х >1 ведется до тех пор, пока относительная погрешность по абсолютному значению не станет меньше заданного значения e.

13. Найти решение х(1), х(2),...х(Т) уравнений х(0) = с, Х(t+1) = ax(t) +b, где t =1,2,...,T a и b - константы, путем итеративных вычислений с постоянным шагом.

Замечание: при разработке программы использовать оператор FOR NEXT.

14. Дан числовой массив, в котором записано N чисел. Найти наибольший элемент массива.

15. Дан числовой массив, в котором записано N чисел. Найти наименьший элемент массива.

16. Дан числовой массив размером N. Преобразовать массив таким образом, чтобы значения его элементов не убывали.

17. Дан числовой массив размером N. Преобразовать таким образом, чтобы значения его элементов не возрастали.

18. Вычислить значение квадратного корня из выражения ах+ву+с для всевозможных пар значений x и y:

х = 1,2; y =1,2,3,4,5,6,7,7,8; а =1, b =2, с=1.

19. Определить сумму всех двузначных нечетных чисел в диапазоне от 11 до 99.

20. Найти наибольший общий делитель двух натуральных чисел M и N.

21. Рассчитать ежегодные размеры вклада S =S0(1+P/100)^ 5, где S0 - начальная сумма вклада,

P - процент начисления

n - срок хранения, n=1,2,...,N.

22. Сформировать таблицу умножения 16-ричных чисел.

23. Вычислить факториал N =n! = 1*2*3...k...n

N=N*K K=k+1.

24. Вычислить произведение положительных элементов массива чисел (х,х2...,x i...,хN).

25. Вычислить значение функции Sin(x) в 100 точках, определенных на задаваемом отрезке [a, b] с шагом h=(b-a)/100, и выбрать среди этих значений максимальное.

26. Построить таблицу расчета квадратных корней из числа x, построив цикл For x=1 To 10. Для вычерчивания линий таблицы используйте подпрограмму.

27. Определить количество гласных в заданном тексте.

28. Условия задачи: на склад привозят однородный груз на машинах различной грузоподъемности. Вместимость склада не более 100 тонн. Ввести в цикле веса груза прибывающих машин и посчитать количество разгруженных машин.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]