Вложенная структура «Развилка»

                                                                                                                

 

                                                                                

                                                                                 

 

                                                   

 

                                                                         

                                                                                                                                                               

 

                                                 

                                                              

                                                

 

S1, S2, S3 может содержать как одно так и несколько действий (операторов).

 

Блочный синтаксис

 

If <условие> then

<оператор S1>

Elseif <условие 2> then

<оператор S2>

Else

<оператор S3>

End if

 

Блочный синтаксис используется при формировании более сложных условий, кроме того, он позволяет улучшить читабельность.

Разделитель строк – используется для разделения одной строки на несколько физических. В VB существует специальная комбинация символов (V и _ и Enter).

Это удобно когда операторы не помещаются полностью на экране.

 

Операторы сцепления строк (&, +)

 

В VB символ «+» используется как математический знак и для соединения или сцепления строк его использовать не удобно.

 

Комментарий

 

Для выделения комментариев в VB используется одиночный апостроф (´).

Пример: ´ Объявление переменных.

Символ объединения строк позволяет объединить в одной строке несколько операторов.

Пример:

y = 0: x = 0: a = 5.

 

Пример вложенной структуры «Развилка»:

 

1) Постановка задачи:

Вычислить функцию

2) Состав входных данных:

x.

3) Состав выходных данных:

y.

 

4) Формула:

5) Схема алгоритма:

 

 

                                                         

 

 

                                                         

 

                                                      

 

 

                                                     

                   

 

              

 

6) Код приложения:

Private Sub Command1_Click()

Dim a As Single, x As Single, y As Single

x = InputBox("Введите значение x=")

If x >= 3 And x <= 7 Then

a = InputBox("Введите значение a=")

y = Sin(a * x) ^ (1 / 3) + x

ElseIf x < 7 Then

y = Exp(x) + 5

Else

y = Sin(x)

End If

MsgBox "при x=" & x & Chr(10) & "y=" & y

End Sub

 

СТРУКТУРА «ЦИКЛ»

 

«ЦИКЛ» используется для повторения одних и тех же действий при выполнении программы. Количество повторений определяется значением логического выражения, которое в свою очередь зависит от управляющей переменной называемой Параметром Цикла.

До начала цикла Параметру Цикла присваивается некоторое начальное значение, которое в процессе повторений обязательно должно изменятся. В противном случае Цикл может стать бесконечным, т.е. программа зацикливается.

Существуют Циклы с предусловием и с постусловием.

 

«Цикл» с предусловием

 

Он выполняется после проверки логического выражения.

Алгоритм выглядит следующим образом:

 

                           

 

                     

                                                                                     

                                             

                    

 

                                              

                  

 

 

Данная структура может быть описана различными конструкциями:

1) For…Next

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

For <параметры Цикла> = <начальное значение параметра Цикла> to

<конечное значение параметра Цикла> [Step <шаг>]

<тело Цикла>

NEXT [<параметр Цикла>]

При отсутствии ключевого слова Step (величина шага) принимается равной +1.

Шаг может быть положительный и отрицательный.

2) Do…Loop

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

Например: обрабатывается набор записей поступающих из базы данных.

Обычно количество записей не известно, но может быть определено когда достигнут конец файла.

Do <условие>

<тело Цикла>

Loop

Данная конструкция может быть использована аналогично конструкции For…Next и тогда она будет выглядеть:

a) Do WHILE <условие повторения>

<тело Цикла>

<изменение параметра Цикла>

Loop.

b) Do…UNTIL

Do UNTIL <условие завершения Цикла>

<тело Цикла>

<параметр Цикла> = <параметр Цикла> + <шаг>

Loop.

Примечание:

По международному соглашению при работе с вещественными данными к конечному значению параметра цикла прибавляется половина величины шага, чтобы за счет погрешности не потерять последнее значение заданного диапазона.

В блок-схеме этот момент не учитывается.

Пример:

1) Постановка задачи:

Вычислить значение функции y = sinx, если известно, что –π ≤ x < π и величина шага ∆x = π/4.

2) Входные данные: ∆x, π.

3) Выходные данные: y.

4) Схема алгоритма: