4. Циклические алгоритмы. Циклы с предусловием и постусловием

Главной этих циклов является условие, которое может быть любым выражением, принимающим значение Истина (True) или Ложь (False). В Visual Basic есть два основных цикла с условием – конструкция Do While … Loop и с постусловием конструкция Do Until … Loop. Оба они могут быть с предусловием или с постусловием. Циклы Do While … Loop и Do Until … Loop имеют следующий синтаксис:

Циклы с предусловием:		Циклы с постусловием:
Do While Л. Выр Операторы Exit Do] Loop	Do Until Л. Выр Операторы [Exit Do] Loop	Do Операторы [Exit Do] Loop While Л. Выр.	Do Операторы [Exit Do Loop Until Л. Выр

В первом случае условие задается в операторе начала цикла, во втором – в операторе конца цикла.

DO , LOOP - ключевые слова, обозначающие начало и окончание цикла;

WHILE и UNTIL - ключевые слова, определяющие тип цикла.

Л. Выр - логическое выражение (условие)

Цикл DO WHILE выполняется до тех пор, пока условие имеет значение True (т.е.пока условие выполняется).

Цикл DO UNTIL выполняется до тех пор, пока условие имеет значение False. (т.е.пока условие не выполнится).

EXIT DO - принудительный выход из цикла.

З

Рисунок 56 –Проект «Ряд»

адача Составить программу нахождения суммы элементов ряда: 1/1, 1/4, 1/9, …, с заданной точностью E(число Е меньше или равно 1).

Постановка задачи. Из условия задачи видно, что знаменатель-это квадрат натурального числа, а также видно и то, что количество повторений цикла неизвестно. Решим эту задачу с помощью цикла с предусловием. Пусть переменная I это номер элемента ряда, который изменяется от единицы с шагом 1. Точность E введем с экранной формы, сюда же выведем суммы элементов ряда S. Интерфейс проекта «Ряд» (Рисунок 56), и описание изменённых свойств объектов (Таблица 51), и тексты процедур с использованием различных конструкций циклов приведены ниже (Таблица 50).

Таблица 50 – Варианты процедур проекта «Ряд»

Цикл с предусловием	Цикл с постусловием
Private Sub C1_Click() Dim E As Single, S As Single, I As Integer E = Val(Te.Text) I = 1 S = 0 Do While 1 / I ^ 2 >= E S = S + 1 / I ^ 2 I = I + 1 Loop Label2.Caption = " Cумма значение Ряда " + Format(S, "0.000") End Sub	Private Sub UserForm _Click() Dim E As, S As Single, I As Integer E = Val(Te.Text) I = 1 S = 0 Do S = S + 1 / I ^ 2 I = I + 1 Loop Until 1 / I ^ 2 < E Label2.Caption = " Cумма значение Ряда " + Format(S, "0.000") End Sub

Таблица 51 - Изменённые свойства объектов проекта «Ряд»

№	Объект	Свойство(Properties)	Новое значение
1	UserForm1(форма)	Caption (Заголовок)	Ряд
2	CommandButton1 (Кнопка)	Caption (Заголовок)	старт
		Name(Имя)	C1
3	Textbox1	Name	Те
4	Label1	Caption	Значение Е
5	Label2	Caption

8. Массивы

Для хранения в памяти компьютера большого числа однотипных данных используются массивы. Каждый элемент массива обладает общим именем индивидуальным номером( индексом) и значением, т. е. является переменной с индексом.

Допустим, нам известна температура в каждый из дней октября

День месяца	1	2	3	4	5	6	7	8	9	10	11	12	13	14	…	29	30	31
Температура, С	5	7	9	8	2	0	3	11	12	3	0	-2	-4	0	…	0	1	2

Тогда температура - это последовательность чисел, следующих по порядку одно за другим. А день месяца – это порядковый номер элемента в этой последовательности или индекс.

По таблице можно определить, что температура в первый день месяца была 5 градусов, во второй – 7, в десятый – 3, а в двадцать девятый - 0.

Если обозначим последовательность температур за весь месяц, например, буквой t, тогда можно обозначить через t(l) температуру первого дня месяца, t(2) - второго, ..., t(31) -последнего.

Таким образом, под массивом можно понимать набор однотипных данных, объединенных одним именем и отличающихся индексами. или Последовательность фиксированного числа однотипных переменных, имеющих общее имя.

В нашем примере имя массива t, а индекс может принимать любые целочисленные значения от 1 до 31. Обращение к элементу массива производится по его имени, состоящему из имени массива и его индекса, например, t(7), при этом каждый элемент массива имеет свое значение. Если индекс массива имеет значение i, то обращение к элементу массива можно осуществить как t(i).

Этот пример является определением одномерного массива – одномерной таблицы, а если данные можно представить в виде двумерной таблицы, то и массив можно определить как двумерный.

Массивы могут быть различных типов: числовые, строковые и т. д.