8.11. Циклические алгоритмы

.Теоретические сведения.

Типы циклов

· Do...Loop: повторяет набор инструкций, пока условие имеет значение True или пока оно не примет значение True

Sub ChkFirstWhile()

counter = 0

myNum = 20

Do While myNum > 10

myNum = myNum - 1

counter = counter + 1

Loop

MsgBox "Выполнено " & counter & " итераций цикла."

End Sub

· For...Next: использует счетчик. Повторяет набор инструкций указанное число раз.

· For Each...Next: повторяет набор инструкций для каждого объекта семейства

Sub TwosTotal()

For j = 2 To 10 Step 2

total = total + j

Next j

MsgBox "Сумма равна " & total

End Sub

Решение задач

ЗАДАЧА 6

Составить алгоритм на VBA, обеспечивающий выполнение следующих действий:

а). Переменной С присвоить значение суммы элементов массива:

ЗАДАЧА 7

Составить алгоритм, обеспечивающий вычисление и печать значений функции Y=f(x) в точках X₁, X₂,...,X_n:

а).

ЗАДАЧА 8

Переменная Х меняет свое значение от Х_н до Х_к с шагом Х. Разработать алгоритм, обеспечивающий вычисление и печать значений аргумента Х и функции Y=f(x) при каждом значении Х. Значения Х_н, Х_к иХ являются исходными и подлежат вводу.

а) Хн=-2, Хк=8, Х=2.

ЗАДАЧА 9

Разработать алгоритм, обеспечивающий для заданного одномерного массива из n элементов {Ai}, i=1,2,.....,n выполнение следующих преобразований:

д) найти номер и величину наименьшего элемента Аi

8.12. Создание пользовательских форм с элементами управления

Цель практического занятия- приобретение и закрепление умений в использовании пользовательской формы для ввода вывода данных.

Алгоритм выполнения действий студентами при использовании формы для ввода вывода данных:

а) Открыть текстовый документ Word.

б) Сохранить текстовый документ под именем Пз_i Фамилия, где i- номер занятия, Фамилия- фамилии студентов.

в) Используя команду Вид/ Панели инструментов/ Настройка создать панель VBAПрограммы, смотри рис.1.

В конце занятия результаты работы предъявить преподавателю.

Рис. 1.

г) Командой Сервис/ Макрос/ Редактор VBA запустить редактор VBA.

Привести редактор VBA к стандартному виду (панель Стандарт, слева закреплены окна проекта и свойств, справа окно модуля).

Командой Вставка/ UserForm вставить модуль формы.

Разработать в конспекте эскиз формы (смотри Рис. 2.).

Используя панель элементов поместить на форму элементы управления.

Рис. 2.

д) Изучить условия очередной задачи, определить вводимые и выводимые данные.

Задача: Составить блок- схему алгоритма и программу на VBA для вычисления и печати функции .

е) Перейти в текстовый процессор Word.

В текстовом документе, используя Автофигуры, для конкретной задачи составить ГСА и написать текст процедур (смотри Рис. 3.).

Ниже приведен алгоритм решения задачи: